(Publisher) 的 InstalledPrinters 物件
代表所有 Printer 物件的集合,每個物件都代表電腦上安裝的其中一個印表機。
註解
若要為使用者提供印表機的選擇來列印出版物,您可以逐一查看 InstalledPrinters 集合,以取得電腦上安裝之所有印表機的名稱清單。
InstalledPrinters 集合的預設屬性為 Item 。
範例
下列 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 支援與意見反應。