Supprimer lignes si pas dans autre table

Bonjour tout le monde,

Je viens une fois de plus solliciter votre aide d'experts.

J'aimerais supprimer les lignes du tableau présent sur la feuille 1 si le critère "NUM" présent dans la colonne B n'est pas répertorié dans la colonne A du tableau sur la feuille 2 et je n'arrive pas à le faire.

Si je ne suis pas assez claire dites le moi.

Je vous mets en fichier joint mon classeur pour y voir plus clair.

Je vous remercie par avance pour votre précieuse aide.

AMAYAS

3classeur.xlsm (17.84 Ko)

Bonjour AMAYAS,

à tester,

Sub Macro1()
Dim i As Long, rw As Long
rw = Sheets("Feuil1").Cells(Rows.Count, 1).End(xlUp).Row
For i = rw To 5 Step -1
 If IsError(Application.Match(Sheets("Feuil1").Cells(i, "B"), Sheets("Feuil2").Range("A:A"), 0)) Then Rows(i).Delete Shift:=xlUp
Next i
End Sub

Je vous remercie, ça m'a énormément aidé

Rechercher des sujets similaires à "supprimer lignes pas table"