ページを指定して印刷する方法について説明します。印刷を開始するページ番号と印刷を終了するページ番号を指定し、連続したページの印刷を行います。
構文
記述方法は以下の通りとなります。
Sheets（"［シート名］"）.PrintOut From:=［番号①］, To:=［番号②］
[説明]：
ページを指定して印刷する場合は
「Sheets（"［シート名］"）.PrintOut From:=［番号①］, To:=［番号②］」
と記述します。
| ［シート名］ | 印刷するシート名を記述します。 ※「”」（ダブルクォーテーション）で囲みます。 |
| ［番号①］ | 印刷を開始するページを記述します。 |
| ［番号②］ | 印刷を終了するページを記述します。 |
[記述例]：
Sheets("Sheet1").PrintOut From:=2, To:=3
使い方
使い方について具体的に説明します。
[プログラミング例]：
Sub サンプル()
Sheets("Sheet1").PrintOut From:=2, To:=3
End Sub
内容は、「Sheets1シートの2～3ページを印刷して下さい。」との意味になります。
※上記のプログラミング例は、VBE（VBA記述画面）に記述しないと実行ができません。VBEの開き方についてはこちらを参考にして下さい。
[実行例]：
①<実行>ボタンには上記のプログラミング例のプログラムが登録されています。また、Sheets1シートの1～3ページは以下の様になっており、2ページと3ページには写真が貼り付けてあります。<実行>ボタンをクリックします。（※ボタンの作り方やボタンにプログラムを割り当てるにはこちらを参考にして下さい。）
②Sheets1シートの2ページと3ページが連続で印刷されます。（※1ページ目は印刷されません。）
[サンプル]：
上記で説明したファイルをダウンロードできます。ご自由にお使い下さい。
ページを指定して印刷する方法についての説明は以上です。
おわりに
今回はページを指定して印刷する方法について説明しました。類似した内容にシートを印刷する方法や印刷部数を指定する方法があります。また、印刷プレビューで確認する方法もあります。こちらも一緒に覚えておいて下さい。