Bug sur structure classeur (VBA)

Bonjour,

J'ai un petit soucie, je souhaite faire dans un onglet deux commandes distincte, l'une ouvre l'onglet (exemple dans F3 je saisi "Janvier" il ouvre le mois de janvier jusque là pas de soucie.
- Mais après si je rajoute une autre commande en demandant un aperçu il ne veut pas j'ai un message d'erreur "erreur de compilation: Nom ambigu détecté : worksheet_change



MACRO DANS ONGLETS feuil1 (MENU) (si une seule pas de problème si les deux alors message erreur)

Code:

---

1 2 3 4 5 6

Private Sub Worksheet_Change(ByVal Target As Range)   If Intersect(Range("f3"), Target) Is Nothing Then Exit Sub Sheets(Target.Value).Select   End Sub

---

Code:

---

1 2 3 4 5 6

Private Sub Worksheet_Change(ByVal Target As Range)   If Intersect(Range("A1"), Target) Is Nothing Then Exit Sub Sheets(Target.Value).PrintPreview   End Sub

---

Pouvez-vous m'aider ? merci d'avances.

Cordialement.

Bonjour,

Si je comprends bien, tu répètes 2 fois la même procédure dans le même module de feuille.
Tu ne peux pas faire ça.
Tu dois mettre tes 2 conditions dans la même procédure.

oui c'est ça, comment puis je résoudre ce soucie ?

Bonjour,

comme l'as indiqué parmi :

Citation:

---

Tu dois mettre tes 2 conditions dans la même procédure.

---

il faut pour cela mettre tes deux conditions dans le même test :

Code:

---

1 2 3 4 5 6

If Blabla then ' traitement du premier ElseIf Blabla2 then ' traitement de la deuxième condition End if

---