Affichage Lignes

Signaler
Messages postés
1
Date d'inscription
mercredi 20 novembre 2019
Statut
Membre
Dernière intervention
20 novembre 2019
-
jordane45
Messages postés
27058
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
13 décembre 2019
-
Bonjour,

j'ai fait ce code, qui fonctionne très bien, grâce à M. Mike_31.
Il s'active avec un bouton VALIDER.
Sub masquer_ligne_Vide()
Dim cel As Range
For Each cel In Range("A1:A100")
If cel = "" Then
cel.EntireRow.Hidden = True
End If
Next
End Sub


Maintenant, j'aimerais, un code qui me permetterait de remettre les lignes masquées à leur dimension originales de 18, avec un bouton ANNULER.
Quelqu'un pourrait m'aider s.v.p.

2 réponses

Messages postés
27058
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
13 décembre 2019
1934
Bonjour
Utilise l'enregistreur de macro.
Regarde le code généré et inspire t'en pour ecrire le tient.