Code vba pour sélectionner une imprimant
vijyc
-
pilas31 Messages postés 1878 Statut Contributeur -
pilas31 Messages postés 1878 Statut Contributeur -
Bonjour,
Ci-après le code que j'ulisais sous Excel 2003 et que j'essaye de faire fonctionner sous Excel 2010.
ActivePrinter = "\\GTSIMP02\ILRG0451 sur Ne04:"
ActiveWindow.Selection.PrintOut
Et qui donne un message d'erreur à la lecture:
"Erreur d'exécution'1004' - La méthode 'ActivePrinter' de l'objet '_global' a échoué"
Est ce que quelqu'un peut m'aider à réécrire ce code.
Par avance merci
Ci-après le code que j'ulisais sous Excel 2003 et que j'essaye de faire fonctionner sous Excel 2010.
ActivePrinter = "\\GTSIMP02\ILRG0451 sur Ne04:"
ActiveWindow.Selection.PrintOut
Et qui donne un message d'erreur à la lecture:
"Erreur d'exécution'1004' - La méthode 'ActivePrinter' de l'objet '_global' a échoué"
Est ce que quelqu'un peut m'aider à réécrire ce code.
Par avance merci
A voir également:
- Activeprinter
- Code ascii - Guide
- Code puk bloqué - Guide
- Comment déverrouiller un téléphone quand on a oublié le code - Guide
- Code activation windows 10 - Guide
- Scanner qr code pc - Guide
1 réponse
Bonjour,
Certainement que le chemin vers l'imprimante n'est pas le bon.
Voici une astuce pour savoir si c'est le bon chemin qui est utilisé.
Aller dans le panneau de configuration pour choisir cette imprimante par défaut.
Puis exécuter la macro suivante :
Ainsi cela donne le bon chemin pour la fonction ActivePrinter
Certainement que le chemin vers l'imprimante n'est pas le bon.
Voici une astuce pour savoir si c'est le bon chemin qui est utilisé.
Aller dans le panneau de configuration pour choisir cette imprimante par défaut.
Puis exécuter la macro suivante :
Sub Chemin_imprimante()
MsgBox Application.ActivePrinter
End Sub
Ainsi cela donne le bon chemin pour la fonction ActivePrinter
