Macro sur fichiers dans dossiers séparés
Résolu/Fermé
cletess
Messages postés
38
Date d'inscription
jeudi 10 janvier 2013
Statut
Membre
Dernière intervention
5 avril 2018
-
Modifié le 19 mars 2018 à 18:24
cletess Messages postés 38 Date d'inscription jeudi 10 janvier 2013 Statut Membre Dernière intervention 5 avril 2018 - 20 mars 2018 à 15:42
cletess Messages postés 38 Date d'inscription jeudi 10 janvier 2013 Statut Membre Dernière intervention 5 avril 2018 - 20 mars 2018 à 15:42
A voir également:
- Macro sur fichiers dans dossiers séparés
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Wetransfer gratuit fichiers lourd - Guide
- Macro word - Guide
- Renommer plusieurs fichiers en même temps - Guide
- Explorateur de fichiers - Guide
1 réponse
yg_be
Messages postés
23476
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
20 février 2025
Ambassadeur
1 568
19 mars 2018 à 23:01
19 mars 2018 à 23:01
bonsoir, peut-être:
dim wb as workbook set wb = Workbooks.Open(objSubFolder.Path & "\information.xlsx")
20 mars 2018 à 11:14
Voici à quoi j'arrive :
En somme, je cherche à ce que la macro ouvre chaque dossier, en liste le nom, ouvre le fichier txt et le convertisse en xlsx, et extraie certaines informations des fichiers xlsx dans le fichier source.
Il me semble que ça fait ce que ça doit faire mais ça me parait (excusez moi l'expression) assez 'bordélique' comme code. J'ai un peu bidouillé différentes macro pour les combiner et je ne sais pas trop comment vérifier le travail !
Je suis forcé d'avouer que je ne suis pas une fleche en VBA alors je procède fort en essais/erreurs
Aussi, la macro est assez lente sur les ~1000 dossiers que je dois traiter. Auriez-vous des idées pour l'optimiser ?
Merci d'avance
CL
20 mars 2018 à 13:11
en tous cas, moi j'essaierais, au lieu de ceci:
de faire cela:
20 mars 2018 à 14:20
Merci pour votre aide !
20 mars 2018 à 15:09
20 mars 2018 à 15:42
Merci !