Changement de feuille

Petit probleme de syntaxe.
Selon la valeur je voudrais changer de feuilles :
C'est un test qui ne marche pas il bloque avec mois:

Code:

---

1 2 3 4 5 6 7 8 9 10

Sub Macro1()   v = 2 mois1 = "Feuil2" mois2 = "Feuil3"   Sheets(mois & v).Select   End Sub

---

J'ai reussi avec cette commande :

Code:

---

1 2	Sheets("Feuil" & v).Select

---

Le problème c'est que dans mon vrai fichier les feuilles s'apelle "Janvier 2012","Fevrier 2012".
Donc ca ne s'applique plus

Merci de votre coup de main :ccool:

Bonjour,
Tu mélanges nom de variable et chaîne de caractères
Utilise plutôt des variables tableaux
Exemple

Code:

---

1 2 3 4

Dim mois(1 To 2) mois(1) = "Feuil1" mois(2) = "Feuil3" Worksheets(mois(1)).Select

---

Bonjour,

En supposant que tes feuilles vont de "Janvier 2012" à "Décembre 2012", tu peux déclarer un tableau contenant tous tes noms de feuilles et utiliser v comme indice.

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Option Explicit   ' pour commencer le tableau avec l'indice 1 Option Base 1   Dim Feuille As String Feuille = Array("Janvier 2012", "Fevrier 2012", ... "Decembre 2012")   ' Ensuite l'activation de la feuille en fonction de v est simple ...   Sheets(Feuille(v)).Select

---