Bonjour à tous,
Je ne suis pas très douée en VBA, j'ai cherché une solution à mon pb hier soir jusqu'à très tard, sans succès.. Je ne comprends pas ce qui coince...
Je souhaite masquer 4 lignes lorsqu'une formule affiche "masquer" dans ma cellule S4 et afficher les lignes lorsque la formule affiche "afficher", tout cela bien sûr de façon automatique.
Voici le code que j'ai inséré au niveau de la feuille (je l'ai trouvé sur le forum et l'ai adapté à mon fichier mais j'ai du louper qqchose qqpart..

Est-ce que quelqu'un peut m'aider à masquer ces lignes ?
Merci beaucoup par avance pour votre aide,
Je vous joins la partie en question de mon fichier : macro IB.xlsm

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub '<-- si plusieurs cellules sont sélectionnées on quitte la procédure sinon ça bug
If Target.Address = "$S$4" Then '<-- vérification que la modification se passe dans la cellule S4
    Select Case Target.Value
        Case "afficher": Rows("24:28").Hidden = False
        Case "masquer": Rows("24:28").Hidden = True
    End Select
End If
End Sub