Compartilhar via


Objeto InstalledPrinters (Publisher)

Representa a coleção de todos os objetos Printer , cada um dos quais representa uma das impressoras instaladas no computador.

Comentários

Para fornecer ao usuário uma opção de impressoras para imprimir uma publicação, você pode iterar por meio da coleção InstalledPrinters para obter uma lista dos nomes de todas as impressoras instaladas no computador.

A propriedade padrão da coleção InstalledPrinters é Item.

Exemplo

Os seguintes Microsoft Visual Basic for Applications (VBA) macro mostra como você pode usar as propriedades de NomeDaImpressora e IsActivePrinter do objeto Printer para obter uma lista de todas as impressoras instaladas no computador e para determinar qual deles está atualmente a impressora ativa.

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 

Propriedades

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.