[VBA] lister fichiers excel

koyot3 · 24 Juillet 2008

Bonjour,

J'ai dossier contenant des fichiers de plusieurs types (word, excel...)
Je voudrais avoir une combolist juste avec les noms des fichiers de type .xls
Quelqu'un aurait-il une idée ??

merci d'avance ? 🙂

BOISGONTIER · 24 Juillet 2008

Re : [VBA] lister fichiers excel

Bonjour,

Code:

Private Sub UserForm_Initialize()
   Répertoire = CurDir() ' nom du répertoire courant
   masque = Répertoire + "\*.xls"
   nf = Dir(masque) ' 1er classeur du répertoire
   Do While nf <> ""
     Me.Choix.AddItem nf
     nf = Dir()      ' classeur suivant
   Loop
End Sub

JB
Formation Excel VBA JB

koyot3 · 24 Juillet 2008

Re : [VBA] lister fichiers excel

merci pour ta réponse

ca marche sauf que tous mes fichiers excels du dossier ne figurent pas dans ma liste ... il en manque !
je sais pas comment c'est possible ....

[VBA] lister fichiers excel

koyot3

Guest

BOISGONTIER

XLDnaute Barbatruc

koyot3

Guest

Discussions similaires

[VBA] lister fichiers excel

koyot3

Guest

BOISGONTIER

XLDnaute Barbatruc

koyot3

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency