juventinino
XLDnaute Nouveau
Bonjour à tous!
Dans un dossier donné, je voudrais ouvrir un fichier .xls (il n'y a qu'un seul fichier .xls dans ce dossier) dont je ne connais pas le noms exact.
J'avais commencé en faisant ça
Sub test()
If ThisWorkbook.Path & "\" & Range("M2").Value & "\Q" & Range("E11").Value & "\" & Range("Q2").Value & "\" & Range("G2").Value & "\" & "*.xls" <> "" Then
Workbooks.Open Filename:=ThisWorkbook.Path & "\" & Range("M2").Value & "\Q" & Range("E11").Value & "\" & Range("Q2").Value & "\" & Range("G2").Value & "\" & "*.xls"
End If
End Sub
A la limite, la seule chose que je sais, c'est que les 5 premiers caractères du fichier que je veux ouvrir sont les mêmes que ceux de la cellule G2
Merci beaucoup pour votre aide!!!!!!
Dans un dossier donné, je voudrais ouvrir un fichier .xls (il n'y a qu'un seul fichier .xls dans ce dossier) dont je ne connais pas le noms exact.
J'avais commencé en faisant ça
Sub test()
If ThisWorkbook.Path & "\" & Range("M2").Value & "\Q" & Range("E11").Value & "\" & Range("Q2").Value & "\" & Range("G2").Value & "\" & "*.xls" <> "" Then
Workbooks.Open Filename:=ThisWorkbook.Path & "\" & Range("M2").Value & "\Q" & Range("E11").Value & "\" & Range("Q2").Value & "\" & Range("G2").Value & "\" & "*.xls"
End If
End Sub
A la limite, la seule chose que je sais, c'est que les 5 premiers caractères du fichier que je veux ouvrir sont les mêmes que ceux de la cellule G2
Merci beaucoup pour votre aide!!!!!!