印刷時のページの番号付けの方向を設定(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 |
実行結果
関連記事
-
-
指定された情報をブックから削除(RemoveDocumentInformation メソッド)
RemoveDocumentInformation メソッド 指定された種類の情 …
-
-
スクロール(LargeScroll メソッド、Smallscroll メソッド)
ワークシートをスクロールする ワークシートをスクロールするには、LargeScr …
-
-
最近使用したファイル(RecentFile オブジェクト,RecentFiles コレクション)
最近使用したファイル(RecentFile オブジェクト,RecentFiles …
-
-
印刷設定(偶数ページのヘッダー・フッターを設定)OddAndEvenPagesHeaderFooter, EvenPage
偶数ページに別のヘッダーおよびフッターを設定 偶数ページのヘッダーおよびフッター …
-
-
シート見出しの表示・非表示(DisplayWorkbookTabs プロパティ)
シート見出しの表示・非表示(DisplayWorkbookTabs プロパティ) …
-
-
ワークシートの追加・削除(Add メソッド・Delete メソッド)
新しいワークシートを作成 Add メソッドで、新しいワークシートを指定した場所に …
-
-
シートが保護されているか確認(ProtectContents プロパティ)
ProtectContents プロパティ ワークシートが保護されているかどうか …
-
-
ブック・シートの名前を取得・設定(Name プロパティ)
ワークブックの名前を取得 Name プロパティで、ワークブックの名前を取得します …
-
-
ウィンドウ枠の固定(FreezePanes プロパティ、SplitColumn プロパティ,SplitRow プロパティ)
ウィンドウ枠の固定と解除 ウィンドウ枠を固定するには FreezePanes プ …
-
-
ユーザー設定のビュー(CustomView オブジェクト)
ユーザー設定のビュー CustomView オブジェクトは、登録されている各ビュ …

