Salut F.Launay, le Forum
J'ai fait récemment une démo pour manipuler des feuilles par une Array.
=> Fichier Téléchargeable Lien supprimé (18k)
=> Fil de Discussion Lien supprimé
Sinon pour le cas précis de ton Array, je ne m'y prendrai pas comme ceci, mais plutôt comme cela :
Sub SheetsArray()
Dim MyTab As Variant
MyTab = Array("Sheet1", "Sheet2", "Sheet4", "Sheet6")
Sheets(MyTab(0)).Activate
End Sub
Entendu dans cet exemple que l'on est en Base 0, et que l'on active donc la Sheets("Sheet1")... (Si on voulait activer la "Sheet6" on écrirait alors Sheets(MyTab(3)).Activate
Bon App
@+Thierry