印刷の倍率（拡大／縮小）（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 |
実行結果
関連記事
-
-
画面の上端・左端を設定（ScrollRow プロパティ、ScrollColumn プロパティ）
画面の上端・左端を設定 ScrollRow プロパティで、指定した行を画面上端に …
-
-
ワークシートのコピー・移動（Copy メソッド Move メソッド）
Copy メソッド Copy メソッドで、指定した位置にワークシートの複製を作成 …
-
-
簡易印刷（PageSetup.Draft プロパティ）
PageSetup.Draft プロパティ PageSetup.Draft プロ …
-
-
枠線を含めて印刷（PageSetup.PrintGridlines プロパティ）
PageSetup.PrintGridlines プロパティ PageSetup …
-
-
計算精度を設定する（PrecisionAsDisplayed プロパティ）
PrecisionAsDisplayed プロパティ PrecisionAsDi …
-
-
Excel を全画面表示（DisplayFullScreen プロパティ）
DisplayFullScreen プロパティ DisplayFullScree …
-
-
ワークシートにクリップボードの内容を貼り付ける（Paste メソッド）
Paste メソッド 指定したワークシート上にクリップボードのデータを貼り付けま …
-
-
ファイル保存の既定の形式を取得・設定（DefaultSaveFormat プロパティ）
DefaultSaveFormat プロパティ DefaultSaveForma …
-
-
ワークシートを参照する（Worksheets プロパティ）
Worksheets プロパティ Worksheets プロパティは、Works …
-
-
PDF または XPS 形式で出力（ExportAsFixedFormat メソッド）
ExportAsFixedFormat メソッド ブックやシートの内容を PDF …