印刷する用紙の向きを設定（PageSetup.Orientation プロパティ）
PageSetup.Orientation プロパティ
PageSetup.Orientation プロパティで、印刷する用紙の向きを設定することができます。値の取得および設定が可能で、XlPageOrientation 列挙型 の定数を使用します。
【書式】
＜取得＞
object.PageSetup.Orientation
＜設定＞
object.PageSetup.Orientation = const
引数・戻り値
- object ・・・ 対象となる Worksheet オブジェクト を指定します。
- const ・・・ 印刷用紙の向きが縦か横を表す XlPageOrientation 列挙型 の定数またはその値を指定します。
定数 値 内容 xlPortrait 1 用紙の向きを縦に設定 xlLandscape 2 用紙の向きを横に設定
PageSetup.Orientation プロパティ 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
Sub Sample_Orientation() Dim w As Worksheet Set w = ActiveSheet '用紙の向きを横向きに設定 w.PageSetup.Orientation = xlLandscape '印刷プレビューを表示 w.PrintPreview End Sub |
実行結果
関連記事
-
-
印刷実行前に総ページ数を取得（ExecuteExcel4Macro メソッド）
印刷の総ページ数を取得（ExecuteExcel4Macro メソッド） Exc …
-
-
印刷設定（偶数ページのヘッダー・フッターを設定）OddAndEvenPagesHeaderFooter, EvenPage
偶数ページに別のヘッダーおよびフッターを設定 偶数ページのヘッダーおよびフッター …
-
-
アクティブシートを参照する（ActiveSheet プロパティ）
アクティブなワークシートを参照する ActiveSheet プロパティを使用する …
-
-
ウィンドウの位置を入れ替える（ActivatePrevious メソッド、ActivateNext メソッド）
ウィンドウの位置を入れ替える ActivatePrevious メソッド、Act …
-
-
印刷設定（ページごとに異なるヘッダー・フッターを設定）Page オブジェクト・HeaderFooter オブジェクト
Page オブジェクト ページごとに異なるヘッダーおよびフッターを設定する場合、 …
-
-
ウィンドウ枠の固定（FreezePanes プロパティ、SplitColumn プロパティ,SplitRow プロパティ）
ウィンドウ枠の固定と解除 ウィンドウ枠を固定するには FreezePanes プ …
-
-
新規ブック作成（Add メソッド）
新規にワークブックを作成する Workbooks コレクションの Add メソッ …
-
-
WorksheetView オブジェクト
WorkSheetView オブジェクト 行列番号や枠線の表示・非表示の設定など …
-
-
ユーザー設定のドキュメントプロパティ（CustomDocumentProperties プロパティ）
CustomDocumentProperties プロパティ ユーザー設定のドキ …
-
-
印刷：余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin
余白を設定する 余白を設定する単位は、pt（ポイント：約 0.03528 cm） …