Masquer ou afficher un nombre variable de lignes

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.

Bonjour,

Ptit bout de code à la tronçonneuse:

Code:

---

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

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.