'inverser la chaine contenant le lien vers ton classeur 'Rechercher le \ 'Recupérer le nom du classeur et réinverser le tout... Chem_Inverse = StrReverse(textbox1.value) Cherche_Slash = InStr(1, Chem_Inverse, "") MonClasseur = StrReverse((Left(Chem_Inverse, Cherche_Slash-1)))
Workboos(MonClasseur).range("A1").select