印刷の倍率（拡大／縮小）（PageSetup.Zoom プロパティ）
PageSetup.Zoom プロパティ
PageSetup.Zoom プロパティを使用して、印刷の倍率を設定します。取得および設定が可能です。バリアント型（Variant）の値を使用します。
＜取得＞
object.PageSetup.Zoom
＜設定＞
object.PageSetup.Zoom = variant
引数・戻り値
- object ・・・ 対象となる Worksheet オブジェクト を指定します。
- variant ・・・ 印刷の倍率（拡大率または縮小率）を、10 ～ 400 の範囲の値（単位は％）、または、False を指定します。
PageSetup.Zoom プロパティ に、10 未満の値や 400 より大きい値を指定するとエラーになります。
PageSetup.Zoom プロパティ に、False を指定した場合、拡大縮小する方法は、FitToPagesWide プロパティ、FitToPagesTall プロパティ の設定により決定します。
PageSetup.Zoom プロパティ 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
Sub Sample_Zoom() Dim w As Worksheet Set w = ActiveSheet '印刷の縮小率を50％に設定 w.PageSetup.Zoom = 50 '印刷プレビューを表示 w.PrintPreview End Sub |
実行結果
関連記事
-
-
ウィンドウを拡大・縮小（Zoom プロパティ）
ウィンドウを拡大・縮小（Zoom プロパティ） ウィンドウの表示サイズをパーセン …
-
-
印刷設定（フッターに画像を指定）LeftFooterPicture,CenterFooterPicture,RightFooterPicture
フッターに画像を表示するには LeftFooterPicture プロパティ、C …
-
-
アクティブプリンタを変更（ActivePrinter プロパティ）
ActivePrinter プロパティ ActivePrinter プロパティを …
-
-
印刷実行前に総ページ数を取得（ExecuteExcel4Macro メソッド）
印刷の総ページ数を取得（ExecuteExcel4Macro メソッド） Exc …
-
-
アウトライン記号の表示・非表示（DisplayOutline プロパティ）
アウトライン記号の表示・非表示（DisplayOutline プロパティ） Di …
-
-
ファイル保存の既定の形式を取得・設定（DefaultSaveFormat プロパティ）
DefaultSaveFormat プロパティ DefaultSaveForma …
-
-
ワークシートにクリップボードの内容を貼り付ける（Paste メソッド）
Paste メソッド 指定したワークシート上にクリップボードのデータを貼り付けま …
-
-
印刷のタイトル行、タイトル列を設定（PrintTitleRows,PrintTitleColumns）
PageSetup.PrintTitleRows プロパティ PageSetup …
-
-
簡易印刷（PageSetup.Draft プロパティ）
PageSetup.Draft プロパティ PageSetup.Draft プロ …
-
-
印刷設定（偶数ページのヘッダー・フッターを設定）OddAndEvenPagesHeaderFooter, EvenPage
偶数ページに別のヘッダーおよびフッターを設定 偶数ページのヘッダーおよびフッター …