macro qui supprimer ligne si les cellule de la colonne E sont vide

[bob4112]

Bonjour,
je souhaite supprimer les lignes si les cellules de la colonne E sont vide. Mais je veux que la macro s'applique sur E13 jusqu'a E1100.
Je vous met mon document en ligne.

 

[Papou-net]

Re : macro qui supprimer ligne si les cellule de la colonne E sont vide

Bonjour bob4112,

Ci-joint copie de ton fichier avec macro de suppression lancée par le bouton Démo.

Cette macro est située dans le module Module1.

Pour info: la lecture des lignes se fait dans la colonne F, et ne porte que sur les cellules non vides afin d'optimiser la rapidité de la boucle.

Cordialement.

Edit: fichier modifié suite à erreur de logique (merci à JBARBE que je salue)

 

[JBARBE]

Re : macro qui supprimer ligne si les cellule de la colonne E sont vide

Bonjour à tous,

Essayez ceci :

Sub SupprimerLignes()
Dim L As Long
For L = 1100 To 13 Step -1
   If Feuil1.Cells(L, 5).Value = False Then Feuil1.Rows(L).Delete
   Next L
End Sub

bonne journée

 

[bob4112]

Re : macro qui supprimer ligne si les cellule de la colonne E sont vide

merci à vous cela fonctionne!!!