Printers オブジェクト (Access)
Printers コレクションには、現在のシステムで使用可能なすべてのプリンターを表す Printer オブジェクトがあります。
Application オブジェクトの Printers プロパティを使用して、Printers コレクションを取得します。 Printers コレクションの内容を列挙するには、For Each...Next ステートメントを使用します。
プリンターを名前で参照するか、コレクション内のインデックスを参照して、Printers コレクション内の個々の Printer オブジェクトを参照します。
Printers コレクションには 0 から始まるインデックスが付けられます。 プリンターをインデックスで参照する場合、最初のプリンターは Printers(0)、2 番目のプリンターは Printers(1)、以下同様になります。
Printers コレクションから Printer オブジェクトを追加または削除することはできません。
次の例では、システムで使用可能なすべてのプリンターに関する情報を表示します。
Dim prtLoop As Printer
For Each prtLoop In Application.Printers
With prtLoop
MsgBox "Device name: " & .DeviceName & vbCr _
& "Driver name: " & .DriverName & vbCr _
& "Port: " & .Port
End With
Next prtLoop
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。