Excel VBA 印刷時に拡大・縮小の設定をする

Excel VBAでワークシートを印刷する時に拡大したり、縮小したりする方法を記録します。

印刷時の拡大、縮小の設定は「PageSetup」オブジェクトの「Zoom」プロパティを使います。

< スポンサーリンク >

 

書き方

WorkSheetオブジェクト.PageSetup.Zoom = 倍率

 

拡大・縮小設定

100%の倍率に設定して、印刷プレビューで表示してみます。

Sub test()
    ActiveSheet.PageSetup.Zoom = 100
    ActiveSheet.PrintPreview
End Sub

Excel印刷拡大・縮小

Excel印刷拡大・縮小

 

150%の倍率に拡大して、印刷プレビューで表示してみます。

Sub test()
    ActiveSheet.PageSetup.Zoom = 150
    ActiveSheet.PrintPreview
End Sub

Excel印刷拡大・縮小

Excel印刷拡大・縮小

 

25%の倍率に縮小して、印刷プレビューで表示してみます。

Sub test()
    ActiveSheet.PageSetup.Zoom = 25
    ActiveSheet.PrintPreview
End Sub

Excel印刷拡大・縮小

Excel印刷拡大・縮小

 

< スポンサーリンク >



サブコンテンツ

このページの先頭へ