Bonjour.
J'ai besoin de connaître le contenu d'un répertoire.
J'ai trouvé la solution dans la Faq avec l'instruction Dir("c\*.*", vbDirectory)qui fonctionne avec le chemin absolu mais que je n'arrive pas à faire fonctionner avec CurrentProject.path.
Voici le code que j'utilise :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
rep = Dir("CurrentProject.Path & " \ " & RepSauv1 \ *.*", vbDirectory)
dans lequel Repsauv1 est le résultat d'une Fonction Dlook'up qui contient le nom du répertoire Sauvegarde (voir ci dessous)
Ce code renvoie rep=" " Erreur Fichier inexistant.
Voici le code avec le chemin absolu :
rep = Dir("d:\mic\documents\mes bases\Rigel\compta\compta test\sauvegarde\*.*", vbDirectory) qui fonctionne très bien mais je ne suis pas maître de l'adresse où la frontale est installée chez mes utilisateurs
Je n'ai pas réussi à trouver la bonne syntaxe avec CurrentProject.PathMerci à qui pourra me donner la solution.
Cordialement.
Mic352