Lone-wolf
XLDnaute Barbatruc
Bonjour à toutes et à tous
Après une infructueuse recherche sur le net pour imprimer un pdf existant, j'aurais besoin de votre aide s'il vous plaît. Il y a beaucoups de sujets qui traite sur l'impression et à chaque fois je tombe sur SelectedSheets.Printout ou ActiveSheet.PrintOut. On peux le faire avec ShellExecute, mais comment le parametrer pour avoir le nombre de copie voulu? (Si c'est possible, bien entendu). Comment faire, en vba, pour interagir avec l'imprimante par défaut sur le nombre de copies?
Après une infructueuse recherche sur le net pour imprimer un pdf existant, j'aurais besoin de votre aide s'il vous plaît. Il y a beaucoups de sujets qui traite sur l'impression et à chaque fois je tombe sur SelectedSheets.Printout ou ActiveSheet.PrintOut. On peux le faire avec ShellExecute, mais comment le parametrer pour avoir le nombre de copie voulu? (Si c'est possible, bien entendu). Comment faire, en vba, pour interagir avec l'imprimante par défaut sur le nombre de copies?
Code:
Dim nbCopies As Long
nbCopies = Label7.Caption
ShellExecute vbNull, "open", Lien1, vbNull, vbNull, SW_SHOWNORMAL
Dim impDefaut$
impDefaut = Application.ActivePrinter
Application.ActivePrinter = "HP Officejet 6700 (réseau) sur Ne02:"
Dernière édition: