印刷するページを指定する
確認後、練習シートの印刷ページ1〜2だけを印刷します。
実行前に確認
- 実際に印刷します。出力先、ページ数、部数をプレビューで先に確認してください。
1サンプルコード
Sub Sample3080()
If MsgBox("練習シートの印刷ページ1〜2だけを印刷します。既定のプリンターで実行しますか？", vbYesNo + vbQuestion) <> vbYes Then Exit Sub
ThisWorkbook.Worksheets("練習").PrintOut From:=1, To:=2, Copies:=1
End Sub図で見る操作の流れ
イメージ図コードに沿った概念図です。実際の画面や実行結果ではありません。
手動：事前確認
「練習」の印刷プレビューで少なくとも2ページあることと出力先を確認
手動：同意
印刷ページ1〜2の確認で「はい」を選ぶ
マクロ：実印刷
印刷ページ1〜2だけを既定のプリンターへ1部出力
「いいえ」で終了。1〜2はシートの行番号ではなく印刷ページ番号です。
コードの処理を説明する模式図です。実際の画面や実行結果を撮影したものではありません。
使い方・実行手順を確認する3つの手順で、コードの使い方を確認できます
- 1
練習用のブックをExcelマクロ有効ブック（.xlsm）で保存します。「練習」シートに印刷用データを入れます。プレビューで少なくとも2ページあることを確認します。
- 2
Alt＋F11でVBEを開き、［挿入］→［標準モジュール］にコードを貼り付けます。
- 3
Sample3080内にカーソルを置いてF5で実行します。確認後、練習シートの印刷ページ1〜2だけを印刷します。