Comme pour tout nettoyage de tableau par suppression de lignes, parcourir la liste des membres de BAS EN HAUT évite qu'une suppression ne décale les lignes pas encore examinées.

Sub NettoyerListeMembresSansEmail()
    Dim i As Integer
    For i = 30 To 2 Step -1
        If Cells(i, 4).Value = "" Then
            Rows(i).Delete
        End If
    Next i
End Sub

Toute ligne dont la colonne D (adresse email) est vide est supprimée — un email manquant empêche d'envoyer les communications de l'association (convocations, newsletters), rendant ces fiches inexploitables pour une campagne d'envoi.

À vous de jouer : adaptez cette macro pour, plutôt que supprimer la ligne, la copier d'abord vers une feuille "À compléter" avant de la retirer de la liste principale.