J'ai un fichier nommé "SG 11-10.xls".
Mes fichiers commencent toujours par "SG", je souhaiterais trouver code de ce style qui m'activerait le classeur commençant par "SG" :
- Code: Tout sélectionner
Workbooks("SG%").Activate
Merci d'avance,
Seb
Workbooks("SG%").ActivateSub test()
Dim wb As Workbook
For Each wb In Workbooks
If UCase(wb.Name) Like "SG*" Then wb.Activate: Exit For
Next wb
End Sub
Utilisateurs parcourant ce forum: Bing [Bot], Google [Bot], Google Adsense [Bot], Majestic-12 [Bot], rocket4 et 13 invités