エクセル VBA又は関数

教えて下さい。
エクセルで見積書を作成しています。
Ａ４用紙設定の左側半分を客先提出用、右側半分に自社のベース見積もりになっており、客先提出用（左半分）をＡ４縦印刷、自社用（左側＋右側＝全体）をＡ４横で印刷で印刷します。そして見積書ですので見積もり内容によってページ数が増えたりします。印刷する際に毎回Ａ４縦又Ａ４横で印刷範囲を設定して印刷しております。それをＶＢＡ又は関数によって、Ａ４縦ボタン＋ページ数またＡ４横ボタン＋ページ数という風に印刷用途によって範囲＋ページ数を変えて印刷できるように出来ないでしょうか。
文章が分かりにくく申し訳ありませんが宜しくお願い致します。

No.1 回答者： hallo-2007 回答日時： 2016/09/02 20:07

vba案ですが、宜しいでしょうか？

Sub ボタン1_Click()
If Range("M24").Value <> "" Then Range("Ｌ2:Ｐ32").PrintPreview:Exit Sub
If Range("M15").Value <> "" Then Range("Ｌ2:Ｐ22").PrintPreview:Exit Sub
Range("Ｌ2:Ｐ10").PrintPreview
End Sub
こんな感じで印刷範囲を変えてみては・・・