調べたいExcel-VBAの使用例などキーワードを入力してください

エクセル印刷時の用紙の向きを横方向にVBAで設定する方法

Excel-VBA印刷
スポンサーリンク

エクセルで表などを作って印刷する事ってよくある日常業務ですが、印刷したい範囲が用紙に収まっていない失敗ありませんか?

印刷する前にページ設定や印刷プレビューを確認し忘れたっていう失敗、紙の無駄遣いに後悔しますよね。

とりっぷぼうる
とりっぷぼうる

エクセルファイルを保存する時にはページ設定していて、問題なく印刷できたはずなのに、なぜ?失敗?

経験上、共有パソコンや共有プリンターなどを使用している場合や、他人が作ったエクセルを開いた時にこのようなトラブルに見舞われますので、使う人によってエクセルファイルが異なるので当然設定も変えちゃうことが考えられます。

スポンサーリンク

Orientationプロパティで用紙の向きを指定する

毎回ページ設定で用紙の向きを確認するのは面倒ですし、ましてエクセルファイルを自分以外の人が使う時はなおさらです。

そこでいつものようにユーザーフォームに配置したコマンドボタンに「用紙の向きは横方向」と書き込めば簡単に設定でき、VBAが分からない人が使っても自動的にプログラムが作動するので問題解決しますよ。

用紙の向きを横方向に設定するVBA

Private Sub CommandButton1_Click()
WorkSheets(”用紙”).PageSetup.Orientation = xlLandscape
End Sub

VBA解説
  1. コマンドボタン1がクリックされたら
  2. 「用紙」という名のシートのページ設定の向きは横方向にする
  3. マクロ記録終了

たったこれだけで横方向になります。

ちなみに初期設定でもある縦方向も設定可能ですよ。

方向設定
縦方向xlPortrait
横方向xlLandscape
とりっぷぼうる
とりっぷぼうる

印刷をVBAを使って行うならば、用紙の向きも一緒にVBAコードを追記することをおススメしますよ。

また、印刷のページ設定をVBAで出来るのは用紙だけではありませんので、一緒に設定したほうが失敗印刷すなくて済みますよ。

スポンサーリンク

印刷関連VBA

スポンサーリンク
ボタン1つで作業完了へ
ちょっとの工夫でエクセル作業が飛躍的に早く終わったらいいなあ~と思いませんか? 面倒くさい作業よ!さようなら!

スポンサーリンク


印刷
参考になりましたらシェア宜しくお願い致します

山頂テラスデッキからの三段紅葉(2019年11月)

フリーパスって助成金つぎ込んでいいの?

コロナ禍のGo To トラベル以外にも助成金だらけでうらやましいね。

安くなったフリーパスで遊びに行きたいけど、給与も減って余裕ないよね。

Excel VBA