VBA suppresion de ligne en fonction d'un critère

Bonjour

J’aimerais si possible avec VBA :

Supprimer le contenu d’une ligne entière d’une plage nommée par exemple « liste1 », si et seulement si la valeur d’une cellule est présente dans une autre plage nommée «liste2»

Par exemple la liste1 contient :

1

2

3

4

5

La lise 2 contient :

1

50

70

Là on effacera la ligne entière de la liste1 contenant le chiffre 1

Ps : les deux listes sont des colonnes

Merci de votre aide …

Salut Kass,

une façon de faire...

Dim Liste1 As Range
Dim Liste2 As Range
'
Set Liste1 = Range("A1:A5")
Set Liste2 = Range("A12:A16")
'
For Each Cel In Liste1
    For Each CelBis In Liste2
        If CelBis = Cel Then
            CelBis.Rows.Delete
        End If
    Next CelBis
Next Cel

A+

merci bcp

Rechercher des sujets similaires à "vba suppresion ligne fonction critere"