印刷する用紙の向きを設定（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 |
実行結果
関連記事
-
-
簡易印刷（PageSetup.Draft プロパティ）
PageSetup.Draft プロパティ PageSetup.Draft プロ …
-
-
ウィンドウの分割（Split プロパティ,SplitColumn プロパティ,SplitRow プロパティ）
ウィンドウの分割と解除 ウィンドウ（ワークシート画面）を分割するには、Split …
-
-
印刷設定（ヘッダー／フッター）書式コード・VBAコード
印刷設定（ヘッダー／フッター）書式コード・VBAコード ヘッダーおよびフッター（ …
-
-
印刷のページ区切り（DisplayPageBreaks プロパティ）
DisplayPageBreaks プロパティ 印刷したあとや印刷プレビューを表 …
-
-
ワークシートにクリップボードの内容を貼り付ける（Paste メソッド）
Paste メソッド 指定したワークシート上にクリップボードのデータを貼り付けま …
-
-
ブック作成時のシート数の取得・設定（SheetsInNewWorkbook プロパティ）
SheetsInNewWorkbook プロパティ Excel で新規ブックに自 …
-
-
印刷実行前に総ページ数を取得（ExecuteExcel4Macro メソッド）
印刷の総ページ数を取得（ExecuteExcel4Macro メソッド） Exc …
-
-
ブックを開く（Open メソッド）
ブックを開く（Open メソッド） ブックを開くには、Workbooks コレク …
-
-
ブックのパスを取得（FullName プロパティ,Path プロパティ）
FullName プロパティ・Path プロパティ ブックのパス（保存場所）を調 …
-
-
印刷の先頭のページ番号を設定（PageSetup.FirstPageNumber プロパティ）
PageSetup.FirstPageNumber プロパティ PageSetu …