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 la collection de tous les objets Printer , chacun représentant l’une des imprimantes installées sur l’ordinateur.
Remarques
Pour fournir à l’utilisateur un choix d’imprimantes pour imprimer une composition, vous pouvez effectuer une itération dans la collection InstalledPrinters pour obtenir la 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 la 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.