Affichage Lignes

Se_Bert Messages postés 1 Date d'inscription   Statut Membre Dernière intervention   -  
jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   -
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.

1 réponse

jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   4 752
 
Bonjour
Utilise l'enregistreur de macro.
Regarde le code généré et inspire t'en pour ecrire le tient.
1