適用対象
|
Application オブジェクト |
|
Form オブジェクト |
|
Report オブジェクト |
現在のシステムの既定のプリンターを表す Printer オブジェクトを設定または返します。 読み取り/書き込みが可能です。
expression.Printer
expression 必ず指定します。 [適用先] リスト内のいずれかのオブジェクトを返す式。
使用例
次の例では、Printers コレクション内の最初のプリンターをシステムの既定のプリンターにして、その名前、ドライバー情報、およびポート情報をレポートします。
Dim prtDefault As PrinterSet Application.Printer = Application.Printers(0)Set prtDefault = Application.PrinterWith prtDefault MsgBox "Device name: " & .DeviceName & vbCr _ & "Driver name: " & .DriverName & vbCr _ & "Port: " & .PortEnd With