VBA

Résolu
fannoche35 Messages postés 12 Statut Membre -  
fannoche35 Messages postés 12 Statut Membre -
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

  1. cs_Le Pivert Messages postés 8437 Statut Contributeur 730
     
    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
    1. fannoche35 Messages postés 12 Statut Membre
       
      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