EXCEL VBA 印刷 または PDF

質問

こんにちは。
EXCEL VBA初心者で、いろいろ調べてみましたが見つけられず
質問します。

1.自分のPCに設定してあるプリンタを選択したい

2.プリンタを指定して紙で印刷する

3.もしくは、PDF印刷を選択したらファイル名を指定して保存
ファイルの保存先は、自分で決めるのでダイアログボックスまででいいですが
ファイル名はあらかじめ決めておきたい。

・PDFにするには、「クロセPDF」を使用しています。(プリンター名も)
・PDFファイル名:ABCD
・使用するユーザーは、全国にいてプリンタ名などばらばら
・Windows XP/ EXCEL2003

シート名を選択してプリンターを選択するところまでは、わかりましたが
印刷するとき、PDFにするときしファイル名を表示させるのがどうしても
わかりません・・・

Sub 印刷orPDF()

Sheets("シート名").Select
Application.Dialogs(xlDialogPrint).Show

以下、不明

どうぞ宜しくお願い申し上げます。

回答No.1

ap_2 · ベストアンサー

そこまでは調べたのねｗ

Excelには操作の記録っていうステキな機能があるので、試してみてください。メニューのツール＞マクロ＞新しいマクロの記録。記録終了を押すまでの間、操作がマクロで記録されます。
あと、VBE(マクロの編集画面）には便利な機能が多いですよ。F8を押すと１行ずつ実行（メニューのデバッグ＞ステップインとかのショートカット）できたり、コード行の左をクリックすると（茶色のマーク）その行で処理を一時停止できたりします。「その１行」が何してるのか、とか調べるのに便利。
記録して、調べて、補って・・・とやってみてください。

ちなみに、自動操作したいだけなら、わざわざダイアログだすは必要ないので
　Sheets("シート名").Select
　Activesheet.PrintOut
だけで、とりあえず印刷できます。

プリンタ変更して2部なら、
　ActiveSheet.PrintOut Copies:=2, ActivePrinter:="プリンタドライバ名"
とか。

ただ、ファイル名を指定して保存まではできないかも。たぶん、ファイル名決めるダイアログは、PDF生成ソフトの画面であってExcelじゃないと思うので、他のソフトをマクロで操作するとなると、とても難しいですよ。