VBA

Résolu/Fermé

fannoche35 Messages postés 11 Date d'inscription jeudi 2 novembre 2017 Statut Membre Dernière intervention 12 mars 2018 - Modifié le 22 nov. 2017 à 17:02
fannoche35 Messages postés 11 Date d'inscription jeudi 2 novembre 2017 Statut Membre Dernière intervention 12 mars 2018 - 22 nov. 2017 à 17:13

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.

A voir également:

VBA
Vba récupérer valeur cellule ✓ - Forum VB / VBA
Mkdir vba ✓ - Forum VB / VBA
Vba range avec variable ✓ - Forum VB / VBA
Excel compter cellule couleur sans vba - Guide
Vba dépassement de capacité ✓ - Forum Excel

1 réponse

Réponse 1 / 1

cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024 729
22 nov. 2017 à 17:08

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

fannoche35 Messages postés 11 Date d'inscription jeudi 2 novembre 2017 Statut Membre Dernière intervention 12 mars 2018
22 nov. 2017 à 17:13

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

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

Erreur d'exécution 13 Incompatibilité de type

Méthode find dans VBA - Recherche de données sous Excel

ouverture d'un fichier excel à partir d'un code VBA

appliquer une pause dans une macro vba excel