DonBeuBeu
XLDnaute Junior
Bonjour à tous,
Petit problème que je n'arrive pas à résoudre:
J'ai un code ou je souhaite ouvrir un fichier:
Remarquez le ".xlsx" sur l'avant dernière ligne, ils'agit de l’extension du fichier sauf que par moment sa peut être du xls, je voudrais donc que si il ne trouve pas le fichier, il re-tente de l'ouvrir avec l'extension ".xls"
J'ai déjà essayer des trucs du genre "On Error GoTo", sans succès...
Merci d'avance!!!
Petit problème que je n'arrive pas à résoudre:
J'ai un code ou je souhaite ouvrir un fichier:
Code:
Sub test()
Dim référence As String
référence = Range("R3").Value
Const début_chemin = "F:\methodes_meca\B SEVESTRE\SMED optimisation changement série\Feuille d'op\"
Workbooks.Open Filename:=chemin & référence & ".xlsx", UpdateLinks:=False
End Sub
Remarquez le ".xlsx" sur l'avant dernière ligne, ils'agit de l’extension du fichier sauf que par moment sa peut être du xls, je voudrais donc que si il ne trouve pas le fichier, il re-tente de l'ouvrir avec l'extension ".xls"
J'ai déjà essayer des trucs du genre "On Error GoTo", sans succès...
Merci d'avance!!!
Dernière édition: