OVH Cloud OVH Cloud

definir une imprimante

2 réponses
Avatar
flomen
Bonjour,
Je cherche le code VBA pour définir le nom de l'imprimante destinataire d'un
état (Cas de plusieurs imprimantes) ainsi que le nombre de copie.
J'ai vu qu'il existe PrtDevNames et PrtDevMode, je n'ai pas trouvé d'exemple.
Ce que je souhaite faire c'est de définir l'imprimante et le nombre de copie
avant d'afficher l'aperçu. De l'aperçu, si l'utilisateur clique sur imprimer,
il faudrait que l'état soit imprimé en n copie sur l'imprimante définie
préalablement.
Si quelqu'un peut me donner le code VBA, ça m'aiderai beaucoup.
Merci

2 réponses

Avatar
3stone
Salut,

"flomen"
| Je cherche le code VBA pour définir le nom de l'imprimante destinataire d'un
| état (Cas de plusieurs imprimantes) ainsi que le nombre de copie.
| J'ai vu qu'il existe PrtDevNames et PrtDevMode, je n'ai pas trouvé d'exemple.
| Ce que je souhaite faire c'est de définir l'imprimante et le nombre de copie
| avant d'afficher l'aperçu. De l'aperçu, si l'utilisateur clique sur imprimer,
| il faudrait que l'état soit imprimé en n copie sur l'imprimante définie
| préalablement.
| Si quelqu'un peut me donner le code VBA, ça m'aiderai beaucoup.


docmd.RunCommand acCmdPrint

te suffit il ?

--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
flomen
Bonjour,

Pour mon cas je ne peux pas utiliser docmd.RunCommand acCmdPrint
Cependant j'ai trouvé la solution dans l'aide d'Access, là voici :

Function SetPrinter() '
Dim PRTID As Printer
Set PRTID = Application.Printers(3) ' Nom de l'imprimante
DoCmd.OpenReport "ETAT1", acViewPreview
Reports("ETAT1").Printer.Copies = 2
End Function

Dés que l'utilisateur clique sur la bouton Imrimer de la barre d'outils,
l'édition est éditée sur l'imprimant définie par Set PRTID .... et le nombre
de copie est bon.

Merci


Salut,

"flomen"
| Je cherche le code VBA pour définir le nom de l'imprimante destinataire d'un
| état (Cas de plusieurs imprimantes) ainsi que le nombre de copie.
| J'ai vu qu'il existe PrtDevNames et PrtDevMode, je n'ai pas trouvé d'exemple.
| Ce que je souhaite faire c'est de définir l'imprimante et le nombre de copie
| avant d'afficher l'aperçu. De l'aperçu, si l'utilisateur clique sur imprimer,
| il faudrait que l'état soit imprimé en n copie sur l'imprimante définie
| préalablement.
| Si quelqu'un peut me donner le code VBA, ça m'aiderai beaucoup.


docmd.RunCommand acCmdPrint

te suffit il ?

--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/