Discussion :

[Nonno 94]

Bonjour le Forum,

j'ai besoin de votre aide pour créer un code qui me permettra de masquer ou afficher des lignes en fonction de valeurs contenues dans des cellules.

Le numéro de la 1 ère ligne à masquer ou effacer est contenu dans la cellule ("R2") et celui de la dernière est dans la cellule ("T6").

Je vous remercie pour vos réponses et vous souhaite une bonne fin de journée;
Cordialement.

Nonno 94.

[Mr Poulpe]

Bonjour,

Ptit bout de code à la tronçonneuse:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Sub Masquer()
 
With ActiveSheet
Set Rng = .Range("A" & .Range("R2").Value, "a" & .Range("T6").Value).EntireRow
    If Rng.Hidden Then Rng.Hidden = False Else Rng.Hidden = True
End With
 
End Sub

Poulpe

[Nonno 94]

Bonsoir Mr. Poulpe,

ce "p'tit" bout de code prouve que Mr. Poulpe sait se servir d'une ...................tronçonneuse !
Il n'est donc pas qu'un excellent .......................pronostiqueur (cf. la Coupe du monde de foot-ball 2010).

MERCI et BRAVO.

Cordialement.

Nonno 94.

P. S. : sans vouloir "abuser", sait-il comment procéder pour rétablir un affichage normal des pages du site "Developpez.com" qui suite à une mauvaise "manip" de ma part effectuée "à l'insu de mon plein gré" est désormais si petit que j'ai été contraint "d'investir dans du matériel grossissant" pour lire les pertinentes réponses à mes questions (j'exagère à peine) !
Ce problème n'affecte que les pages de ce site qui nous apprécions.