printer.copie = (2) est-il possible d'envoyer 1 vers tel imprimante et tel vers

Question

Salut 
      dans mon prog de facturation , il fait a la sortie deux copie je voudrais savoir si c'est possible
qu'il y aie une copie vers une imprimante par default et une autre copie vers une autre imprimante
comme sa je pourrait faire deux copie vers l'imprimante par default et une vers convertion pdf (imprimante virtuelle)

Merci

thierrydelepine · Answer

l'objet printer par defaut est ton imprimante par defaut de windows

mais si tu fais Set printer =  "Nom exacte d'une Imprimante"

alors printer est li&#233; a ta nouvelle imprimante et plus &#224; celle par defaut de windows (jousqu' a tu refasse un set ou que tu quitte ton prog)

exemple : 

For Each MyPrinter In Printers
        If MyPrinter.DeviceName = "Nom de l'imprimante" Then
            Set Printer = MyPrinter
            Exit For
        End If
    Next

petiflamand · Answer

je vient de faire 

set printer = "Generic PostScript Printer"

et il dit un objet est obligatoire

thierrydelepine · Answer

comme ca cela ne marche pas, tu ne peux pas dire un objet = un string !!!

utilise cette boucle pour selectionner l'objet qui t'interresse

For Each MyPrinter In Printers
        If MyPrinter.DeviceName = "Nom de l'imprimante" Then
            Set Printer = MyPrinter
            Exit For
        End If
    Next

Printer.copie = (2) est-il possible d'envoyer 1 vers tel imprimante et tel vers

3 réponses

Discussions similaires