印刷時のページの番号付けの方向を設定(PageSetup.Order プロパティ)
PageSetup.Order プロパティ
PageSetup.Order プロパティで、ページの番号付けの方向(Excel では、ページレイアウトタブの「ページ設定」-「シートタブ」のページの方向)を設定することができます。値の取得および設定が可能で、XlOrder 列挙型 の定数を使用します。
<取得>
object.PageSetup.Order
<設定>
object.PageSetup.Order = const
引数・戻り値
- object ・・・ 対象となる Worksheet オブジェクト を指定します。
- const ・・・ ページの番号付けの方向を表す XlOrder 列挙型 の定数またはその値を指定します。
定数 値 内容 xlDownThenOver 1 左から右 xlOverThenDown 2 上から下
PageSetup.Order プロパティ 使用例
サンプルVBAソース 1
|
1 2 3 4 5 6 7 8 9 10 11 12 13 |
Sub Sample_Order01() Dim w As Worksheet Set w = ActiveSheet 'ページの番号付けの方向を「左から右」に設定 w.PageSetup.Order = xlDownThenOver End Sub |
実行結果
サンプルVBAソース 2
|
1 2 3 4 5 6 7 8 9 10 11 |
Sub Sample_Order02() Dim w As Worksheet Set w = ActiveSheet 'ページの番号付けの方向を「上から下」に設定 w.PageSetup.Order = xlOverThenDown End Sub |
実行結果
関連記事
-
-
白黒印刷(PageSetup.BlackAndWhite プロパティ)
PageSetup.BlackAndWhite プロパティ PageSetup. …
-
-
計算精度を設定する(PrecisionAsDisplayed プロパティ)
PrecisionAsDisplayed プロパティ PrecisionAsDi …
-
-
印刷:余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin
余白を設定する 余白を設定する単位は、pt(ポイント:約 0.03528 cm) …
-
-
Excel を全画面表示(DisplayFullScreen プロパティ)
DisplayFullScreen プロパティ DisplayFullScree …
-
-
スクロールバーの表示・非表示(DisplayHorizontalScrollBar,DisplayVerticalScrollBar)
スクロールバーの表示・非表示の設定 Windows オブジェクト の Displ …
-
-
ブック作成時のシート数の取得・設定(SheetsInNewWorkbook プロパティ)
SheetsInNewWorkbook プロパティ Excel で新規ブックに自 …
-
-
ページ数に合わせて印刷(FitToPagesTall, FitToPagesWide)
PageSetup.FitToPagesTall プロパティ PageSetup …
-
-
シートが保護されているか確認(ProtectContents プロパティ)
ProtectContents プロパティ ワークシートが保護されているかどうか …
-
-
ワークシートを参照する(Worksheets プロパティ)
Worksheets プロパティ Worksheets プロパティは、Works …
-
-
印刷の倍率(拡大/縮小)(PageSetup.Zoom プロパティ)
PageSetup.Zoom プロパティ PageSetup.Zoom プロパテ …

