Ouverture de fichier excel en boucle

Fermé
bla - 26 mai 2015 à 21:23
 bla - 26 mai 2015 à 21:26
Bonjour,

Je bloque sur un point et j'aimerai savoir si quelqu'un peut m'aider. Voilà mon problème:

J'ai plusieurs fichiers excel de la même forme "Toucan_2015_01_01.xls", "Toucan_2015_01_02.xls" où les derniers caractères représente une date.
J'aimerai à partir d'une macro pouvoir ouvrir le premier fichier, copier les données dans un nouveau classeur et fermer ce fichier, puis ouvrir le deuxième fichier, copier les données et le fermer et ainsi de suite.
Sachant que j'ai 365 fichiers j'aimerai savoir s'il est possible de faire une boucle sur le nom du fichier. Un truc du style
for i = 1 to 31
nomfichier = "Toucan_2015_01_" & i & ".xls"
Set wb = Workbooks.Open("C:\Données\Toucan\nomfichier"

?

Merci d'avance
A voir également:

1 réponse

Sinon j'ai aussi aperçu un bout de code utilisant quelque chose comme ça:
Private Sub traiteFichiers()
Dim i As Long
Dim mTabFiles As Excel.Workbook

Set pathfolder = "Z:\LAGIER\Toucan"

For i = LBound(mTabFiles()) To UBound(mTabFiles())

Call traiteFichiers(mTabFiles(i))
Next i

Mais n'étant pas un spécialiste j'ai du mal à comprendre et à développer cette option
0