Cacher une ligne sous conditions
Résolu
Bonjour,
J'aurais besoin d'une aide concernant une formule VBA à créer.
Si la cellule C10 = "Entreprises", tu affiches les lignes 15 et 16.
Si la cellule C10 <>"Entreprises", tu masques les lignes 15 et 16.
Le but c'est que cela se fasse automatiquement sans avoir de bouton macro pour activer....
Merci d'avance de votre aide.
J'aurais besoin d'une aide concernant une formule VBA à créer.
Si la cellule C10 = "Entreprises", tu affiches les lignes 15 et 16.
Si la cellule C10 <>"Entreprises", tu masques les lignes 15 et 16.
Le but c'est que cela se fasse automatiquement sans avoir de bouton macro pour activer....
Merci d'avance de votre aide.
6 réponses
-
Bonjour,
à tester :
Sub masquer() If Range("C10").Value <> "Entreprises" Then Range("15:16").Select Selection.EntireRow.Hidden = True Else Range("15:16").Select Selection.EntireRow.Hidden = False End If End Sub
-
La macro fonctionne mais j'aimerais la meme chose sans utiliser un bouton relié à la macro.
Est-ce possible de le faire en automatique dans la feuille? -
Contributeurbonjour,
Oui, mais à condition que tu écrives "Entreprises" manuellement
-
Cela ne fonctionne pas en automatique. Même si je l'écris manuellement....
Il manquerait un code pour qu'il se fasse sans macro peut etre? -
ContributeurRe
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$C$10" Then
If Target = "Entreprises" Then
Rows("15:16").Hidden = True
Else
Rows("15:16").Hidden = False
End If
End If
End Sub
A intaller dans la fenètre "général" : this worksheet et dans la fenetre "déclaration": "change"
-
-
Contributeur
-
@michel_mJ'ai même remarqué l'écriture de ton code, d'une autre façon sans qu'il n'y ait de Select ;)
-
-
Top, c'est parfait.
Merci beaucoup.
Bonne journée à vous et merci
