Sujet Précédent Sujet Suivant

Macro Afficher Masquer via une liste déroulante

Résolu/Fermé
TiitoBambino Messages postés 18 Date d'inscription mercredi 7 mai 2014 Statut Membre Dernière intervention 24 août 2016 - 16 mars 2016 à 09:55
TiitoBambino Messages postés 18 Date d'inscription mercredi 7 mai 2014 Statut Membre Dernière intervention 24 août 2016 - 16 mars 2016 à 12:01
Bonjour,

J'ai pas mal recherché sur internet une macro qui me permettrais d'afficher et de masquer une partie de ma feuille excel selon le choix d'un menu déroulant.

Voici le code que j'ai trouvé et que je n'arrive pas à faire fonctionné: 

Private Sub Worksheet_Change(ByVal I26 As Range)
    
    Select Case I26
    Case Is = X
        Range("a61:a126").EntireRow.Hidden = False
     
    Case Is = " "
        Range("a61:m126").EntireRow.Hidden = True
     
    End Select
 
End Sub


Rien ne ce passe lorsque je fais mon choix dans le menu déroulant en i26.

Il y a t-il une erreur dans le code?

Si besoin je peut vous fournir le fichier excel.

Merci d'avance,

Cordialement.


A voir également:

1 réponse

Réponse 1 / 1
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 523
16 mars 2016 à 11:57
Bonjour,

Essaie comme cela 
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    If Target.Address = "$I$26" Then
        Select Case Target.Value
            Case "X"
                Rows("61:126").Hidden = False
            Case ""
                Rows("61:126").Hidden = True
        End Select
    End If
End Sub

A+
0
TiitoBambino Messages postés 18 Date d'inscription mercredi 7 mai 2014 Statut Membre Dernière intervention 24 août 2016 31
16 mars 2016 à 12:01
Merci à toi ça fonctionne correctement!

Bonne journée!
0

Discussions similaires

programme qui n'affiche pas le mot secret
EMy.chev -
yg_be -

3 réponses
Suppression listes déroulantes
Archa -
Sam -

5 réponses
Annuaire inversé liste rouge
caro2lille -
gwendolyne72 -

13 réponses