エクセルで印刷の位置がずれたり、用紙からはみ出たり、必要ないページが印刷されたりして困ったことありませんか?
特に共有プリンターや複数プリンターが選択できる場合、さらに共有パソコンともなると、よくある日常です。
ここでは上下左右の余白をVBAで指定して、意図した位置で印刷できるようにします。
ページの余白を設定する
余白の設定は、エクセルのワークシートから「ファイル」➡「印刷」➡「ページ設定」➡「余白」の順に進むと設定できますが、VBAを使ってエクセルを管理しているのでついでに設定しておいて損は無いですよ。
いつものようにユーザーフォームに配置したコマンドボタンに余白無し「0」の設定を書いています。
ポイント単位で余白を上下左右0設定
センチ単位で余白を上下左右0設定
余白無しの0ならば、ポイント単位だろうがセンチ単位だろうが変わりませんが、余白を少しでも必要ならばポイント単位よりもセンチ単位の方が分かりやすいので、下記のようにApplication.CentimetersToPointsを付け加えればセンチ単位になります。
とりっぷぼうる
印刷のページ設定をVBAで出来るのは用紙だけではありませんので、一緒に設定したほうが失敗印刷すなくて済みますよ。
印刷関連VBA