エクセルのマクロについて

質問

エクセルのマクロ初心者です。
マクロを使用して印刷プレビューが見れるようにしたいです。

vlookup関数を使いsheet1に入力し、sheet2,sheet3,sheet4、sheet5へデータを反映させています。
sheet1に入力画面を作成してあり、セルA2~A13に入力すればsheet2へ、セルＡ17～Ａ28はsheet3へ、セルＦ2～Ｆ13はsheet4へ、セルF17~F28はsheet5へデータを反映する作りです。
sheet2~sheet5はフォーマットを作成してあり、印刷するとＡ4で2枚印刷されるようになっています。
入力画面で入力した内容によってはＡ4用紙1枚ですむこともあります。（Ａ1～Ｍ15でＡ4用紙一枚、Ａ1～Ｍ31でＡ4用紙2枚）
教えて頂きたいことは。
・入力画面にマクロのボタンを設置し、ボタンをクリックすると印刷プレビューが表示されるようにしたいです。
・sheet2用、sheet3用、sheet4用、sheet5用、とボタンを設置したい。
・印刷プレビュー後に、（実際には印刷後）に入力画面を表示したい。
・印刷プレビューが見たいのはsheet2,sheet3,sheet4,sheet5です。

以上です。
説明が下手ですみません＞＜

回答No.1

mar00 · ベストアンサー

Sub Macro1()
Worksheets("Sheet2").PrintPreview
End Sub
Sheet2の部分を変更したマクロをそれぞれ記述して
ボタンに登録すればいいと思います。

お礼

回答有難うございます。
大変助かりました＾＾

回答No.2

KURUMITO

例えばシート1で「開発」タブの「挿入」からにコマンドボタンを設けて、右クリックし「コードの表示」を選択します。
例えばシート2の印刷プレビューを見るのでしたら次のようなマクロを入力すればよいでしょう。他のシートも同様に作成します。

Private Sub CommandButton1_Click()
Worksheets("Sheet2").PrintPreview
End Sub

プレビュー場面の「印刷」で印刷はできますし、プレビュー画面の「閉じる」をクリックすればシート1の入力画面に戻りますね。

お礼

回答有難うございます。
大変助かりました＾＾