Autres Afficher et masquer des lignes sous condition cellule non vide

chaelie2015 · 21 Juillet 2020

Bonsoir Forum
je cherche un code qui me permet d'afficher des lignes d'une plage si elles ne sont pas vide et masquer les autres lignes vides via un bouton.
Exemple : plage de ligne 10 - ligne 50) si les cellules dans A(exemple de A5 jusqu'au A20 ne sont pas vide alors afficher les lignes A5-A20 et masquer A21-A50.
Salutations et merci par avance.

mapomme · 21 Juillet 2020

Bonsoir à tous,

Code:

Sub Masquer()
Dim x
Application.ScreenUpdating = False
For Each x In Range("a10:a50"): x.EntireRow.Hidden = Len(x) = 0: Next
End Sub

nota : fonctionne aussi pour les cellules contenant la chaine vide "".

_Thierry · 21 Juillet 2020

Bonsoir @chaelie2015 , la Belgique, et le Forum

Une question subsidiare... quand tu dis : " afficher des lignes d'une plage si elles ne sont pas vide et masquer les autres lignes vides " tu entends TOUTE la ligne qui est vide, ou bien une cellule dans une colonne précise qui serait vide ?

Bien à toi, à vous
@+Thierry

mapomme · 21 Juillet 2020

Bonsoir à tous,

Code:

Sub Masquer()
Dim x
Application.ScreenUpdating = False
For Each x In Range("a10:a50"): x.EntireRow.Hidden = Len(x) = 0: Next
End Sub

nota : fonctionne aussi pour les cellules contenant la chaine vide "".

chaelie2015 · 22 Juillet 2020

Bonsoir Thierry ,mapomme
merci pour la réponse .c'est parfait.
Bonne nuit

Autres Afficher et masquer des lignes sous condition cellule non vide

chaelie2015

XLDnaute Accro

mapomme

_Thierry

XLDnaute Barbatruc

mapomme

XLDnaute Barbatruc

chaelie2015

XLDnaute Accro

Discussions similaires