Excelのマクロについて教えてください。

Excelのマクロ有効テンプレートで保存している、ひな形ブックが有ります。
そのブックに
Sub 青紙印刷()
'
' 青紙印刷 Macro
'

'
Sheets(Array("建築物（表面)5.3", "建築物（裏面）5.3")).Select
Sheets("建築物（表面)5.3").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
IgnorePrintAreas:=False
End Sub
を設定しておりますが、
このマクロを実行すると
Windowsの設定で通常使用するプリンター「ｉＲ-ＡＤＶ　Ｃ7260」で印刷されてしまします。
このマクロを実行した場合のみ
プリンター「ＬＢＰ8710」で印刷をする方法を教えてください。
印刷が完了後は、作業ブックのプリンター設定は通常使用するプリンター「ｉＲ-ＡＤＶ　Ｃ7260」に戻したいです。
プリンターの番号は
「ｉＲ-ＡＤＶ　Ｃ7260」が1
「ＬＢＰ8710」が2
になります。
よろしくお願いいたします。

No.1 ベストアンサー 回答者： Zincer 回答日時： 2022/03/25 10:26

使ったことはありませんが、これで出来そうです。

Excel VBAで通常使うプリンターとは別のプリンターで印刷する-ActivePrinter
https://lilia-study.com/excel/excel-vba/applicat …

この回答へのお礼

回答ありがとうございます。参考にさせて頂きます。

お礼日時：2022/03/25 14:18