Bonjour,
J'ai un fichier sur lequel j'ai créé une macro pour l'impression.
Le problème est que la macro renvoie une erreur 1004 : La méthode 'ActivePrinter' de l0objet'_Application' a échoué. Je suppose que cela provient du fait que le port de l 'imprimante change d'un pc à l'autre.
Avez-vous une solution ? J'avais trouvé ceci sur un forum, mais je ne sais pas comment le modifier pour l'intégrer dans ma macro :
Dim aa as Byte
Dim Nom as String
For aa = 0 to 9
Nom = "\\sfrwng051\PFRWNG0742 sur Ne0" & aa & ":"
On Error Resume Next
Application.ActivePrinter = Nom
If ActivePrinter = Nom Then Exit For
Next