Partager via


Objet Printer (Publisher)

Un objet Printer représente une imprimante installée sur votre ordinateur.

Remarques

La plupart des propriétés de l’objet Printer, telles que PaperSize, PaperSource et PaperOrientation, correspondent aux paramètres de la boîte de dialogue Configuration de l’impression (menu Fichier) de l’interface utilisateur de Microsoft Publisher.

La collection de toutes les imprimantes installées sur votre ordinateur est représentée par la collection InstalledPrinters.

Exemple

Les suivant Microsoft Visual Basic pour Applications (VBA) montre comment vous pouvez utiliser le PrinterName et IsActivePrinter propriétés de l'objet Printer pour obtenir une liste de toutes les imprimantes installées sur l'ordinateur, déterminer lequel d'entre eux n'est actuellement l'imprimante active et obtenir certains paramètres de l'imprimante active. La macro affiche les résultats dans la fenêtre exécution.

Public Sub Printer_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" 
 Debug.Print "Paper size is ", pubPrinter.PaperSize 
 Debug.Print "Paper orientation is ", pubPrinter.PaperOrientation 
 Debug.Print "Paper source is ", pubPrinter.PaperSource 
 End If 
 Next 
 
End Sub

Propriétés

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.