Macro indiquer dans quel sous dossier ce trouve les fichiers Fermé

Question

Bonjour, 

j'ai une macro qui me compile toutes les cellules désirées de plusieurs classeurs uniquement lorsque la macro est enregistrée avec tous les fichiers.

cependant, pour chacun de mes onglets, j'ai besoin d'aller chercher les fichiers à copier dans un sous dossier précis :

Mon gros répertoire s'appelle BUDGET (c'est sur un réseau avec un nom kilométrique...)
dedans j'ai les 4 sous dossiers qui m'intéressent :
M - Budgets Reçus
O - Budgets taux calculés
Obis - Budgets taux retenus
P - Commission

ma macro nomme mon répertoire :
nRep = ThisWorkbook.Path: nImp = Dir(nRep & "\*.xls*")

Du coup : comment je peux insérer dans le répertoire le nom sous dossier ? (je ferais par la suite une macro par onglet)

merci par avance pour votre aide





Configuration: Windows 7 / Chrome 52.0.2743.116

f894009 · Answer

Bonjour,

si j'ai compris votre demande:

ex: pour un des onglet
nRep = ThisWorkbook.Path: nImp = Dir(nRep & "\M - Budgets Reçus\*.xls*")

cooljuly · Answer

bonjour,
oui c'est exact. Désolée, je me suis mélangée avec le mot onglet. je viens de tester et cela fonctionne pour la première partie.

il me reste à trouver comment l'intégrer dans la deuxième partie de mon code :
Set WorkbookImp = Workbooks.Open(Filename:=Repertoire & "\" & nomImp, UpdateLinls:=2)

Merci pour votre aide

Macro indiquer dans quel sous dossier ce trouve les fichiers

2 réponses

Discussions similaires