次の方法で共有


InstalledPrinters オブジェクト (Publisher)

すべての Printer オブジェクトのコレクションを表します。各オブジェクトは、コンピューターにインストールされているプリンターの 1 つを表します。

注釈

ユーザーに文書を印刷するプリンターの選択を提供するには、 InstalledPrinters コレクションを反復処理して、コンピューターにインストールされているすべてのプリンターの名前の一覧を取得できます。

InstalledPrinters コレクションの既定のプロパティは、 アイテム です。

次の Microsoft Visual Basic for Applications (VBA) マクロは、Printer オブジェクトの PrinterName プロパティと IsActivePrinter プロパティを使用して、コンピューターにインストールされているすべてのプリンターの一覧を取得し、現在アクティブなプリンターであるプリンターの一覧を取得する方法を示しています。

Public Sub InstalledPrinters_Example() 
 
 Dim pubInstalledPrinters As Publisher.InstalledPrinters 
 Dim pubApplication As Publisher.Application 
 Dim pubPrinter As Publisher.Printer 
 
 Set pubApplication = ThisDocument.Application 
 Set pubInstalledPrinters = pubApplication.InstalledPrinters 
 
 For Each pubPrinter In pubInstalledPrinters 
 Debug.Print pubPrinter.PrinterName 
 If pubPrinter.IsActivePrinter Then 
 Debug.Print "This is the active printer." 
 End If 
 Next 
 
End Sub 

プロパティ

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。