Supprimer automatiquement certaines lignes

RE Christian


Voici un code qui va le faire (c'est justement avec celui ci que j"ai fait ma Démo UserForm ComboBox


Sub MasquerLignes()
Sheets("Feuil1").Columns(2).SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True
End Sub


Pour remettre en place :
Sub RAZ()
Sheets("Feuil1").Rows.Hidden = False
End Sub


Bonne Soirée
@+Thierry

Tiens en postant l'autre message je vois que ce fil aussi "is dead of mercy"...

J'espère qu'il n'est rien arrivé de facheux à Christian, poser deux questions comme çà coup sur coup... Puis disparaître ainsi sans laiser la moindre trace... Faudrait ptet lancer un avis de recherche... (lol)

...
Bonne journée à ceux/celles qui passeraient par ce fil !
@+Thierry2èm Soupir