Discussion :

[Nako_lito]

Bonjour a tous,
je commence tout juste a découvrir le VBA sous ACCESS et certain automatisme que j'avais sur Excel fonctionne différement ici

Je souhaiterai faire une boucle for each sur un ensemble de fichier excel dans un répertoire.

En VBA Excel, je définissais simplement le chemin et je mettais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Set objDossier = objFSO.GetFolder(Application.CurrentProject.path)
for each objFichier in ObjDossier
----
----
Next

Je pense que c'est du au fait que je veuille manipuler des fichier Excel en ACCESS.

Auriez vous une idée ?
Merci !

[LedZeppII]

Bonjour,

Il manque la collection Files derrière l'objet ObjDossier.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Set objDossier = objFSO.GetFolder(Application.CurrentProject.path)
for each objFichier in ObjDossier.Files
----
----
Next

Je te mets un lien vers un article sur le sujet : Manipulation des fichiers en VBA

A+

[Nako_lito]

Merci pour ces deux infos.