2 Worksheet_Change dans le même fichier

[Catherine D.]

Bonjour,

Je voudrais faire 2 Worksheet_Change dans le même fichier mais cela ne fonctionne pas est-ce que quelqu'un peut m'aider à résoudre ce casse tête SVP?
Macro faite :
Si C3= B ou D alors les lignes 13 à 15 se masquent
Macro non réussie à faire :
Si E3 = 2 ou 4 alors les lignes 26 à 31 se masquent
Je joins un fichier

Merci d'avance de votre aide

 

[pierrejean]

Re : 2 Worksheet_Change dans le même fichier

bonjour Catherine

Vois si cela te convient

 

[job75]

Re : 2 Worksheet_Change dans le même fichier

Bonjour Catherine D.,

Sur Excel 2003, je ne peux pas ouvrir le fichier, alors je suppose cela :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$C$3" Then Rows("13:15").Hidden = Target = "B" Or Target = "D"
If Target.Address = "$E$3" Then Rows("26:31").Hidden = Target = 2 Or Target = 4
End Sub

ou bien plus simplement, si ça ne vous gêne pas :

Private Sub Worksheet_Change(ByVal Target As Range)
Rows("13:15").Hidden = [C3] = "B" Or [C3] = "D"
Rows("26:31").Hidden = [E3] = 2 Or [E3] = 4
End Sub

Il ne peut y avoir qu'une macro Worksheet_Change dans une feuille !

Edit : salut pierrejean c'est vrai tu as Excel 2007 maintenant !

A+