VBA

Résolu
fannoche35 Messages postés 11 Date d'inscription   Statut Membre Dernière intervention   -  
fannoche35 Messages postés 11 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

je cherche à masquer 2 lignes ne se suivants pas si ma checkbox est décochée
J'ai réussi pour une ligne (ligne 77) mais je n'arrive pas à masquer la suivante (ligne 42):

Sub CheckBox2_Click()
' IRM
If CheckBox2.Value = True Then
    Rows("77:77").EntireRow.Hidden = False
           Else
    Rows("77:77").EntireRow.Hidden = True
    
    End If
End Sub


Merci d'avance
EDIT : Ajout des balises de code (la coloration syntaxique).
Explications disponibles ici : ICI

Merci d'y penser dans tes prochains messages.

1 réponse

cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Bonjour,

comme ceci:

Sub CheckBox2_Click()
' IRM
If CheckBox2.Value = True Then
    Rows("77:77").EntireRow.Hidden = False ' affichée
 Rows("42:42").EntireRow.Hidden = False
           Else
   Rows("77:77").EntireRow.Hidden = True 'masquée
 Rows("42:42").EntireRow.Hidden = True
    End If
End Sub

0
fannoche35 Messages postés 11 Date d'inscription   Statut Membre Dernière intervention  
 
merci Le pivert
Quelle rapidité
J'ai trouvé ceci également qui fonctionne :

Sub CheckBox2_Click()
' IRM
If CheckBox2.Value = True Then
Range("42:42,77:77").EntireRow.Hidden = False
Else
Range("42:42,77:77").EntireRow.Hidden = True

End If
End Sub
0