Masquer des lignes dont le numéro est contenu dans une cellule

[meldja]

Bonjour,
J'ai créé des macros pour masquer ou afficher des lignes. J'ai tout simplement fait un enregistrement comme tout bon néophyte que je suis.
J'aimerais savoir s'il existe un code (que je pourrai rajouter) pour qu'il me masque ou m'affiche une ligne dont le numéro serait contenu dans une cellule.
Voila comment je voyais la chose ; en A1, taper le numéro d'une ligne (ex : 5) et en cliquant sur un bouton de la barre d'outil formulaire, le projet me masqerait la ligne 5.
Je souhaiterais utliser toujours la même cellule qui me servirait de référence pour masquer ou afficher des lignes.
Merci d'avance

 

[skoobi]

Re : Masquer des lignes dont le numéro est contenu dans une cellule

Bonjour,
ajoute ceci dans ta macro:

If Rows(Range("a1").Value).Hidden = True Then
   Rows(Range("a1").Value).Hidden = False
Else: Rows(Range("a1").Value).Hidden = True
End If

 

[Coriolan]

Re : Masquer des lignes dont le numéro est contenu dans une cellule

Bonjour Meldja et Skoobi:

Plus simplement:
Rows(Range("A1").value.hidden = not(Rows(Range("A1").value).hidden)

😉

 

[Banzai64]

Re : Masquer des lignes dont le numéro est contenu dans une cellule

Bonjour

Ma contribution
(Pas avoir l'impression d'avoir travaillé pour rien)🙂

 

[meldja]

Re : Masquer des lignes dont le numéro est contenu dans une cellule

Merci, je viens seulement de voir les réponses et je n'ai pas eu le temps de tester. Je vous tiens au courant si ça marche.

 

[meldja]

Re : Masquer des lignes dont le numéro est contenu dans une cellule

Nikel,
ca marhce nikel. Merci pour vos lumières.