Utiliser un fichier avec un nom variable VBA

[Romanino]

Bonjour à tous,

Je souhaite faire une macro dans laquelle j'utilise un fichier dont le nom est variable à cause de la date qui est à la fin de ce fichier.
Je souhaite par exemple ouvrir le fichier en question avec :
Workbooks("Blabla_31_10_2011.xls").Activate
Je souhaiterais l'ouvrir uniquement en utilisant Blabla
J'ai essayé plusieurs technique dont
Workbooks("Blabla*.xls").Activate ou bien en utilisant une chaine de caratère mais rien a faire ça ne fonctionne pas.

Merci pour votre aide

 

[Balot57]

Re : Utiliser un fichier avec un nom variable VBA

Bonjour,
Je te conseille d'utiliser une variable Jour, une variable Mois, une variable Annee et de construire le nom du fichier recherché à partir de ces variables, par exemple "Blabla_" & Jour & "_" & Mois & "_" & Annee.

 

[tbft]

Re : Utiliser un fichier avec un nom variable VBA

Bonjour

en essayant
Sub test()
Dim toto As String
Dim Ma_Date As Date
Ma_Date = Date
toto = "Blabla " + Format(Ma_Date, "dd_mm_yyyy") + ".xls"
End Sub

 

[Romanino]

Re : Utiliser un fichier avec un nom variable VBA

Merci Balot57 et tbft.

J'ai plutôt utilisé la solution de Balot57 car elle m'arrange plus dans mon cas.
J'ai maintenant un autre problème (quoique lié), lorsque j'essaie d'ouvrir mon classeur avec Workbooks("Blabla_" & Day & "_" & Month & "_ " & Year & ".xls").Activate, j 'ai l'erreur "l'indice n'appartient pas à la selection". j'ai bien évidemment défini et initialisé les variables Day, Month et Year.
Pourant le fichier a exactement le bon nom lorsque je regarde dans mon code...
Je ne sais pas si j'ai été clair 😕

 

[Balot57]

Re : Utiliser un fichier avec un nom variable VBA

Avec un exemple, ce serait sans doute mieux. Mais est-ce que ton problème ne viendrait pas du fait que ton classeur n'est pas encore ouvert donc pas trouvé dans Excel et pas prêt à être activé ? Essaie avec :

Dim TmpBook As Workbook
Dim Nomfichier as string
Nomfichier ="Blabla_" & Day & "_" & Month & "_ " & Year & ".xls"
Set TmpBook = Workbooks.Open(Nomfichier )

 

[tbft]

Re : Utiliser un fichier avec un nom variable VBA

Bonjour

Faite attention au chemin d'accès du fichier....