Masquer/Afficher une ligneRésolu

Question

Bonjour à tous,

malgré en recherche sur le forum, je n'ai pas trouvé de sujets pouvant m'éclaircir.
Je souhaiterai comme vous pouvez le voir, masquer/afficher une ou plusieurs lignes selon le contenu d'une cellule.

Par exemple, en rentrant un nom sur une cellule précise, je ferai apparaître sur une autre feuille une ligne.
Seulement, mon code n'a pas l'air spécialement faux et pourtant rien ne se passe. Peut être ai-je mal compris l'utilisation du "Worksheet_Change", dans tout les cas je n'arrive pas à voir d'où pourrait venir l'erreur.
Si quelqu'un à une idée, merci d'avancede m'éclaircir.
Bye.

Sub Worksheet_Change(ByVal DD As Range)

If Not Intersect(DD, Range("B4:C18")) Is Nothing Then
   GoTo Line1
 Else: Exit Sub
 End If
 
Line1:

If Employés.Cells(4, 2) = "" Then
Janvier.Rows("4").Hidden = True

End If

End Sub

mortalino · Accepted Answer

Salut,

Sub Worksheet_Change c'est lorsque ta feuille change, mais pas le contenu,
utilise Sub Worksheet_SelectionChange

De plus, tu as mis => Janvier.Rows("4").Hidden = True
moi je mettrai => Sheets("Janvier").Rows("4").Hide = True

@++

  --Mortalino-- 
Le Mystérieux Chevalier "Provençal, le Gaulois"
N'oubliez pas de lire le règlement !

cs_Tols · Answer

Re,

tout d'abord merci d'avoir répondu si vite !!
Ca marche niquel ducoup, par contre le "Sheets("Janvier")" n'est visiblement pas obligatoire, toutes mes feuilles d'ailleurs sont actives.
Merci encore Mortalino, bye.

mortalino · Answer

De rien !

Merci pour l'info du Sheets non obligatoire, je ne le savais même pas.

@++

  --Mortalino-- 
Le Mystérieux Chevalier "Provençal, le Gaulois"
N'oubliez pas de lire le règlement !

Masquer/Afficher une ligne

3 réponses

Votre réponse

Discussions similaires