Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Représente l’ensemble des objets Imprimante , chacun représentant l’une des imprimantes installées sur l’ordinateur.
Remarques
Pour offrir à l’utilisateur le choix des imprimantes pour imprimer une composition, vous pouvez parcourir la collection InstalledPrinters pour obtenir une liste des noms de toutes les imprimantes installées sur l’ordinateur.
La propriété par défaut de la collection InstalledPrinters est Item.
Exemple
La macro Microsoft Visual Basic pour Applications (VBA) suivante montre comment utiliser les propriétés PrinterName et IsActivePrinter de l’objet Printer pour obtenir une liste de toutes les imprimantes installées sur l’ordinateur et déterminer laquelle d’entre elles est actuellement l’imprimante active.
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
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.