Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Utilisation d'une imprimante partagée...

Utilisation d'une imprimante partagée...

1 réponse
Avatar
Yvan
Bonjour,

L'une de mes macros doit envoyer une impression sur une imprimante partagée.

J'utilise la fonction suivante :

ActiveWindow.SelectedSheets.PrintOut From:=i, To:=i,
Copies:=1, ActivePrinter:="Nom de l'imprimante", Collate _
:=True

Mais cela imprime systématiquement sur l'imprimante par défaut.

Y-a-t-il une subtilité dans la syntaxe à utiliser ?

--
Merci pour vos réponses.
Signaler un problème avec ce contenu

1 réponse

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Pierre
"Yvan" a écrit dans le message de news:

Bonjour,

L'une de mes macros doit envoyer une impression sur une imprimante
partagée.

J'utilise la fonction suivante :

ActiveWindow.SelectedSheets.PrintOut From:=i, To:=i,
Copies:=1, ActivePrinter:="Nom de l'imprimante", Collate _
:=True

Mais cela imprime systématiquement sur l'imprimante par défaut.

Y-a-t-il une subtilité dans la syntaxe à utiliser ?

--
Merci pour vos réponses.




Définir au préalable la "nouvelle" imprimante par défaut
Dim net
Set net = CreateObject("WScript.Network")
net.SetDefaultPrinter "nom de l'imprimante"

Pierre