Sujet Précédent Sujet Suivant

VB6 vers VBA

dany108 Messages postés 71 Date d'inscription mardi 29 janvier 2002 Statut Membre Dernière intervention 6 janvier 2011 - 6 nov. 2003 à 13:57
pelw Messages postés 148 Date d'inscription dimanche 12 janvier 2003 Statut Membre Dernière intervention 14 février 2005 - 6 nov. 2003 à 15:00
Bonjour à tous.
J'utilise ce code sous VB6 pour lister les imprimantes disponibles :

For Each X In Printers
ListeImprimante.AddItem X.DeviceName
Next

je voudrais le transposer en VBA/Excel mais cela ne marche pas :

For Each X In Printers
Application.Sheets("Menu").ListeImprimante.AddItem X.DeviceName
Next

1 réponse

Réponse 1 / 1
pelw Messages postés 148 Date d'inscription dimanche 12 janvier 2003 Statut Membre Dernière intervention 14 février 2005 6
6 nov. 2003 à 15:00
Sous VBA, il faut utiliser l'API EnumPrinters. Un exemple se trouve ici :

http://www.mvps.org/word/FAQs/MacrosVBA/AvailablePrinters.htm

@+

pelw
0

Discussions similaires

Comment fonctionne la fonction FormulaR1C1
cs_razmokets -
wape -

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

2 réponses
A quoi sert la fonction Set ?
ICIoBRa -
ICIoBRa -

3 réponses
Dernière cellule non vide d'une colonne
cs_falafala -
Luigi13013 -

5 réponses
Modulo pour chiffres à virgule
cs_ebro -
Gally -

8 réponses
Rejoignez-nous