pb macro ouverture fichier dans dossier

  • Initiateur de la discussion Initiateur de la discussion cookie57
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

C

cookie57

Guest
Bonjour le forum,

J’ai un petite macro qui ouvre des fichiers excel dans un dossier avant de les traiter . j’ai fait un truc du genre :

‘pour chercher le dossier
ChDir (" C :\patati ")

‘ pour ouvrir tous les fichiers xls se trouvant à l’interieur du dossier
Fichier = Dir("*.xls")
Do While Fichier <> ""

‘ lancer la macro qui traite le fichier ouvert
Traiter_Un_Fichier (Fichier)
Fichier = Dir
Loop

Pas de problème cela marche parfaitement sur mon PC ; par contre sur un PC voisin, le Dir("*.xls") n’a pas l’air de fonctionner puisqu’il ne trouve aucun fichier excel dans le dossier (et pourtant y en a !!!).

Est-ce que qq a déjà eu le probleme ? Cela vient-t-il du code , de la configuration du PC … ?? j’ai beau chercher je ne vois pas d’où cela peut venir
 
Re : pb macro ouverture fichier dans dossier

Bonjour cookie57, le forum,

Il serait étonnant que le repertoire, sur l'autre PC, soit réellement le même...

Le problème du déplacé de tels fichiers.

As-tu fait une recherche, il me semble qu'il y a des fils, là-dessus, avec des codes un peu plus génériques....

J'avais créé sur chaque poste une arborescence précice pour que tout le monde utilise la même chose, seul le prénom de la personne ou l'indentifiant du poste changait.

Sinon, modifier à la mano.... et sur chaque poste...

Bonne recherche.

Jean-Pierre
 
Dernière édition:
Re : pb macro ouverture fichier dans dossier

merci Jean Pierre,
j'ai changé de nom de repertoire, rien n'y fait il ne veut rien ouvrir, il n'a pas l'air de reconnaitre les fichiers xls..

je vais essayer de changer le code...
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Retour