← コード一覧へ戻る
実務印刷設定

特定のセル範囲だけ印刷する

確認後、練習シートのA1:D10だけを印刷します。

実行前に確認

  • 実際に印刷します。出力先、ページ数、部数をプレビューで先に確認してください。

1サンプルコード

Sub Sample3077()
    If MsgBox("練習シートのA1:D10だけを印刷します。既定のプリンターで実行しますか?", vbYesNo + vbQuestion) <> vbYes Then Exit Sub
    ThisWorkbook.Worksheets("練習").Range("A1:D10").PrintOut Copies:=1
End Sub

図で見る操作の流れ

イメージ図

コードに沿った概念図です。実際の画面や実行結果ではありません。

  1. 手動:事前確認

    「練習」のA1:D10と出力先・ページ数をプレビューで確認

  2. 手動:同意

    マクロの印刷確認で「はい」を選ぶ

  3. マクロ:実印刷

    A1:D10を既定のプリンターへ1部出力

「いいえ」で終了。範囲指定は1ページ指定ではなく、ページ設定によって複数ページになる場合があります。

コードの処理を説明する模式図です。実際の画面や実行結果を撮影したものではありません。

使い方・実行手順を確認する3つの手順で、コードの使い方を確認できます
  1. 1

    練習用のブックをExcelマクロ有効ブック(.xlsm)で保存します。「練習」シートに印刷用データを入れます。

  2. 2

    Alt+F11でVBEを開き、[挿入]→[標準モジュール]にコードを貼り付けます。

  3. 3

    Sample3077内にカーソルを置いてF5で実行します。確認後、練習シートのA1:D10だけを印刷します。

使っている機能の公式ドキュメント(Microsoft Learn)