Suppression lignes si colonnes identiques dans 2 feuilles différentes

[Dupond987]

Bonjour à tous,

J'ai essayé d'adapter une macro trouvé sur ce site à mon cas mais sans succès.
Voici la macro que j'ai essayé d'adapter :

Sub SupprimerDoublons()
Dim Collec As New Collection
NbLigne = 1
With Sheets("Feuil1")
  For NbLigne = 1 To .Range("B65536").End(xlUp).Row
    On Error GoTo GestionDesErreurs
    Toto = Range("B" & NbLigne) & Range("K" & NbLigne)
    Collec.Add Toto, CStr(Toto)
   On Error GoTo 0
Autre:
Next
End With
GestionDesErreurs:
If Err = 457 Then
    Err = 0
    Range("B" & NbLigne).EntireRow.Delete
    NbLigne = NbLigne - 1
    Resume Autre
End If
End Sub

Cette macro a été trouvée là : https://www.excel-downloads.com/threads/suppression-des-lignes-si-colonnes-identiques.128563/:

Au lieu de supprimer des lignes si 2 cellules sont identiques dans la même feuille, je souhaiterais supprimer des lignes d'une feuille si des cellules sont identiques dans 2 feuilles distinctes.

Explication par rapport au fichier joint.
Je souhaiterais que, si les cellules de la même ligne et dans les colonnes A, B et D de la feuille "Données incorrectes" sont identiques à des cellules de la même ligne et dans les colonnes A, B et D de la feuille "Données correctes", elle soient supprimées de la feuille "Données incorrectes". (les lignes en bleu dans mon fichier doivent donc être supprimées).

Merci à vous pour votre aide.

Cordialement.