Supprimer les doublons sur 2 feuilles avec plusieurs critères

[sokour]

Bonjour,

Débutant dans le language VBA, je rencontre quelques difficultés concernant l'élaboration d'une macro qui va permettre de repérer les lignes identiques dans 2 feuilles et les supprimer et laisser ainsi les lignes restantes dans chaque feuilles.

Voici comment se compose mon classeur excel :
Feuille 1
La colonne C contient la QUANTITE et la colonne E contient les PRIX
Feuille 2
La colonne O contient La QUANTITE et la colonne I contient les PRIX

Si le prix et la quantité pr la ligne concerné se trouve dans les 2 feuilles alors il faut supprimer la ligne concernée dans la feuille 1 et la ligne concernée dans la feuille 2.

Ainsi à la fin il ne reste plus que des lignes qui n'apparaissent pas dans l'autre feuille.

Je n'arrive pas à monter une macro qui me permette de passer d'une feuille à l'autre.

Pouvez vous m'aider dans ce projet.

Merci🙂

 

[BOISGONTIER]

Re : Supprimer les doublons sur 2 feuilles avec plusieurs critères

Bonjour,

Sub CompareBD()
    Application.ScreenUpdating = False
    Set F1 = Sheets("Feuil1")
    Set f2 = Sheets("Feuil2")
    For i = F1.Range("C" & "65000").End(xlUp).Row To 2 Step -1
       For k = f2.Range("I" & "65000").End(xlUp).Row To 2 Step -1
         If F1.Cells(i, "C") = f2.Cells(k, "O") _
            And F1.Cells(i, "O") = f2.Cells(k, "I") Then
            F1.Rows(i).Delete
            f2.Rows(k).Delete
         End If
       Next k
    Next i
End Sub

JB

 

[sokour]

Re : Supprimer les doublons sur 2 feuilles avec plusieurs critères

Merci pour cette réponse si rapide... mais la macro ne supprimes pas les lignes car en effet il n'y a pas de boucles ?
Car les prix et quantités ne sont pas forcement dans la meme ligne ( ex
Feuille 1
num_ligne 23 quantité 50 prix 22
num_ ligne 25 quantité 50 prix 22

Il faudrait que la macro boucle et laisse seulement les lignes qui ne sont pas dans l'autre feuille

Merci .....

 

[sokour]

Re : Supprimer les doublons sur 2 feuilles avec plusieurs critères

Voici le fichier sur lequel je n'arrives pas
😕

 

[sokour]

Re : Supprimer les doublons sur 2 feuilles avec plusieurs critères

Personne pour m'aider ..;

 

[sokour]

Re : Supprimer les doublons sur 2 feuilles avec plusieurs critères

La macro fournit ne marche pas sur mon fichier;.. c 'est du à une mise en forme?