[[20060831114052]]　『VBA：通常使うプリンタの取得』（純丸）　ページの最後に飛ぶ

『VBA：通常使うプリンタの取得』（純丸）

 久しぶりの質問でドキドキ (^^;
 現在使用中のブリンター（印刷ボタンを押した時に動くプリンター）は、
 Application.ActivePrinter で取得出来るのですが、コントロールパネル＞
「プリンタとＦＡＸ」で設定するところの「通常使うプリンタ」を取得するのは
 どういったコードになるのでしょうか？
（純丸）(o^-')b

 こんにちは。
受け売りですが・・・
　　　　(SHIOJII)

 Sub test()
    ActPrinter = CreateObject("Excel.Application").ActivePrinter
    MsgBox ActPrinter    'デフォルト
    MsgBox Application.ActivePrinter  '今選択中
End Sub

 さっそくにありがとうございます。助かりました。
（純丸）(o^-')b

コメント返信：

[ 一覧(最新更新順) ]

[[20060831114052]] 『VBA：通常使うプリンタの取得』（純丸） ページの最後に飛ぶ

[[20060831114052]]　『VBA：通常使うプリンタの取得』（純丸）　ページの最後に飛ぶ