![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
Excel VBAにて以下のコードを書き,接続されているプリンタ一覧の表示と設定は出来るのですが、のダイアログに表示されるプリンタを指定した物だけにしたいのです。
Application.Dialogs(xlDialogPrinterSetup).Show
ダイアログの組み込み定数「xlDialogPrinterSetup」は引数でプリンタ名を持てる筈なのですが、どう書いてもエラーになってしまいます。
Application.Dialogs(xlDialogPrinterSetup).Show arg1:="プリンタ名"
Application.Dialogs(xlDialogPrinterSetup).Show ("プリンタ名")
Application.Dialogs(xlDialogPrinterSetup).Show(arg1:="プリンタ名")
やりたい事は接続されているマシンの一覧の中から一つのプリンタを選択肢、それだけの設定ダイアログを出したいのです。
A 回答 (1件)
- 最新から表示
- 回答順に表示
![](http://oshiete.xgoo.jp/images/v2/common/profile/M/noimageicon_setting_12.png?e8efa67)
No.1
- 回答日時:
Application.Dialogs(xlDialogPrinterSetup).Show "EPSON PM-920C on LPT1:"
プリンタ名とポート名が入ります。
この書式は OS のバージョンによって指定方法が違ったような記憶があります。(Windows 2000 が違ってたのかな)
んでも質問者さん、ホントにこのダイアログでいいんですか?
もしかしたら Application.Dialogs(xlDialogPrint).Show じゃない?
通常使用するプリンタじゃないプリンタを指定して印刷ダイアログを表示させるのであれば、
Application.ActivePrinter = "EPSON PM-920C on LPT1:"
Application.Dialogs(xlDialogPrint).Show
てな感じです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- プリンタ・スキャナー 印刷 キャンセル&印刷できない 2 2022/11/29 16:45
- PowerPoint(パワーポイント) パワーポイントモバイル 印刷時に詳細設定をしたい 2 2022/05/16 16:34
- プリンタ・スキャナー プリンタを無線化したい 7 2023/04/08 06:25
- プリンタ・スキャナー 佐川急便のプリンターで印刷用の送り状が印刷時に詰まる 2 2022/11/23 18:25
- プリンタ・スキャナー 複合機プリンタではないプリンタの場合、スキャナーは単体で買わないといけないのですか。 複合機だと、何 6 2023/05/24 20:08
- プリンタ・スキャナー 顔料のインクジェットプリンタで今のオススメはなんでしょうか? 6 2023/08/18 16:59
- プリンタ・スキャナー もともとWi-Fi仕様ではないプリンタを、Wi-Fi経由で印刷できるようにできますか。 6 2022/06/24 21:32
- プリンタ・スキャナー 「ネットワーク上にプリンタが見つかりませんでした」 5 2023/08/02 20:53
- Visual Basic(VBA) VBA★PDFをPDFアプリで印刷しようと思っていますが上手くゆきません 1 2022/06/06 22:04
- プリンタ・スキャナー もともとWi-Fi仕様ではないプリンタの背面USB端子に挿すとWi-Fi経由で印刷できるドングル 6 2022/07/01 21:51
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
Application.Dialogs(xlDialogSaveAs)でキャンセルの取得
Access(アクセス)
-
EXCEL VBA 印刷プレビューダイアログのボタン操作を判定したい
Visual Basic(VBA)
-
エクセルVBAで手差しトレイを指定させたい。
Excel(エクセル)
-
-
4
エクセルVBAでプリンタプロパティを操作したい
Visual Basic(VBA)
-
5
エクセルのマクロで印刷プレビューを閉じる方法
Excel(エクセル)
-
6
[ExcelVBA] Application.Dialogs(xlDialogPrint).Show とユーザーフォームについて
Visual Basic(VBA)
-
7
エクセルのマクロで複数シートを両面印刷するには?
Excel(エクセル)
-
8
印刷ダイアログを表示させない方法
Visual Basic(VBA)
-
9
メッセージボックスのOKボタンをVBAでクリックさせたい
Visual Basic(VBA)
-
10
コモンダイアログコントロールで選択されたブリンター名を得る方法を教えて下さい。
Visual Basic(VBA)
-
11
ユーザーフォーム上にアイコンの表示
Visual Basic(VBA)
-
12
Excel VBA の印刷後の判定
Excel(エクセル)
-
13
エクセルを開くと、「プリンタの設定」という画面が表示されます。表示されないようにする方法を教えてください
Excel(エクセル)
-
14
エクセルを選択して開き印刷するマクロ
Excel(エクセル)
-
15
UserForm1.Showでエラーになります。
工学
-
16
フォルダ内のexcelファイルを順に開いて印刷して閉じるマクロを作りたいのでご教授お願いします。
Excel(エクセル)
-
17
【VBA】PDFを2in1で出力したいです
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
同機種のプリンターを買った場...
-
マクロでプリンタ、用紙、給紙...
-
印刷プレビューにない文字が印...
-
左右反転印刷は?
-
バッチファイルでネットワーク...
-
「プリンタが無効です」と表示...
-
指定したプリンタと別のプリン...
-
ログオンスクリプトにてプリン...
-
プリンターが見つかるのに、接...
-
プリンタからPDFが消えてしまい...
-
ワードで背景を入れたのですが...
-
プリンタをBluetoothで無線化し...
-
プリンタからパソコンへスキャ...
-
エプソンのドットインパクトプ...
-
エクセルの余白の塗りつぶし方法
-
あなたは日常生活上、家庭用プ...
-
印刷するときだけパソコンの電...
-
印刷作業が重い
-
ネットワークプリンタの接続
-
A4で巻き三つ折りの6ページ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
同機種のプリンターを買った場...
-
エクセルの余白の塗りつぶし方法
-
左右反転印刷は?
-
マクロでプリンタ、用紙、給紙...
-
印刷しようとすると「保存」が...
-
エクセルの「赤」の印刷がうま...
-
「指定したPPDは無効です」でプ...
-
太文字が印刷されない。
-
印刷プレビューにない文字が印...
-
プリンタをBluetoothで無線化し...
-
プリンタがスプール中のまま印...
-
複数のシートを一括で手差し→自...
-
遠隔地にあるプリンタに出力し...
-
エクセルの用紙サイズについて...
-
エクセル ファイルごとのプリ...
-
ワードで背景を入れたのですが...
-
アプリ毎にデフォルトのプリン...
-
「プリンタが無効です」と表示...
-
印刷するときだけパソコンの電...
-
エクセルでの袋とじ
おすすめ情報