Bouton afficher ligne masquée Excel [Résolu/Fermé]

Signaler
-
Messages postés
6862
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
4 août 2020
-
Bonjour,

Je souhaiterais savoir si il est possible de faire une macro qui affiche a chaque fois la première ligne masquée.

Ex : J'ai un tableau de 100 lignes, je masque les 70 dernières lignes. Je voudrais mettre un bouton qui affiche les lignes 1 par 1 en fonction des besoins.

Merci d'avance pour votre aide

Bonne journée

1 réponse

Messages postés
6862
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
4 août 2020
535
Bonjour,

comme ceci:

 Sub afficher()
Dim c As Range, ligne As Integer
  For Each c In Sheets("Feuil1").UsedRange.Rows
    If c.Hidden = True Then
       ligne = c.Row
        Rows(ligne & ":" & ligne).EntireRow.Hidden = False
  Exit For
       End If
   Next c
End Sub


Voilà