Sujet Précédent Sujet Suivant

Gérer les imprimantes en code sous VBA Access

Chris_LaFouine Messages postés 109 Date d'inscription mardi 13 avril 2004 Statut Membre Dernière intervention 4 juin 2008 - 28 juil. 2004 à 15:21
Chris_LaFouine Messages postés 109 Date d'inscription mardi 13 avril 2004 Statut Membre Dernière intervention 4 juin 2008 - 5 août 2004 à 15:23
Je voudrais savoir s'il est possible sous VBA ACCESS de controler les imprimante, je m'explique, je veux faire un truc de ce style :

If Condition then
IMPRIMER SUR IMPRIMANTE 1
Else
IMPRIMER SUR IMPRIMANTE 2
End If

Je précise que ces imprimante sont sur un réseau!
Voila, merci d'avance

3 réponses

Réponse 1 / 3
cs_toto1980 Messages postés 81 Date d'inscription lundi 13 janvier 2003 Statut Membre Dernière intervention 15 février 2008 1
28 juil. 2004 à 16:00
Essaye
dim p as printer

if .. then
set printer =imprimante1
else
set printer=imprimante2
end if
0
Réponse 2 / 3
patsonk Messages postés 25 Date d'inscription vendredi 18 juin 2004 Statut Membre Dernière intervention 30 octobre 2007
5 août 2004 à 00:14
essaye d appeler la fenetre du systeme windows qui permet de choisir l imprimante qu'on veut mettre en standart.
pour etre plus clair. exple avec un fichier word, tu clicques dans le menu sur : fichier, imprimer et tu as une fenetre qui te permet de choisir une imprimante.

bonne journée et bonne chance.
patsonk
0
Réponse 3 / 3
Chris_LaFouine Messages postés 109 Date d'inscription mardi 13 avril 2004 Statut Membre Dernière intervention 4 juin 2008
5 août 2004 à 15:23
Toto1980, ta solution fonctionne... que sous ACCESS XP !!!

Dim p as printer
set printer=...

tout ça n'est pas reconnu par ACCESS 2000!!!
0

Discussions similaires

access vba recherche de donnee ds une table
yafisab -
yafisab -

2 réponses
afficher pdf dans userform (vba excel)
37224Scan -
mortalino -

2 réponses
Recuperer le code ASCII d'une lettre
cs_lucio57 -
Gobillot -

5 réponses
Comment fonctionne la fonction FormulaR1C1
cs_razmokets -
wape -

2 réponses
fonction modulo en VBA
krisprolss -
Benouille -

2 réponses
Rejoignez-nous