Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Supprimer les doublons sur 2 feuilles avec plusieurs critères

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion sokour
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
S

sokour

XLDnaute Occasionnel
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🙂
 
Trier par date Trier par votes
Re : Supprimer les doublons sur 2 feuilles avec plusieurs critères

Bonjour,

Code: 
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
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
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 .....
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

D
  • Résolu(e)
XL 2019 plusieurs critères
Réponses
5
Affichages
95
Dand87
D
  • Résolu(e)
Microsoft 365 Recherche sur plusieurs Feuilles
2
Réponses
18
Affichages
629
lcouaci
C
  • Résolu(e)
Microsoft 365 Recherche de doublons à plusieurs critères sur plusieurs colonnes
Réponses
4
Affichages
237
job75
A
  • Question Question
Autres Excel 2007 Recherche dans plusieurs feuilles INDEX EQUIV INDIRECT DECALER
Réponses
3
Affichages
135
AD74
A
P
  • Résolu(e)
XL 2021 Formule avec SI ET et si possible plusieurs ET
Réponses
4
Affichages
139
PR.
P
S
  • Résolu(e)
XL 2016 Avis / Aide réécriture code
2 3
Réponses
38
Affichages
785
safranien
S
G
  • Question Question
XL 2016 filtrer, copier et coller les données avec la macro
Réponses
4
Affichages
186
job75
  • Question Question
Microsoft 365 Effacer (et non supprimer) une ligne suivant texte.
Réponses
6
Affichages
352
DAVID-44-
  • Question Question
Microsoft 365 créer des feuilles automatiques et une formule avec condition de remplissage
Réponses
2
Affichages
366
luno123
  • Résolu(e)
Microsoft 365 Découper un fichier en plusieurs fichiers
2
Réponses
24
Affichages
556
nat54
S
  • Résolu(e)
Microsoft 365 Actualiser formules matricielles
Réponses
3
Affichages
169
Standpi
S
G
  • Résolu(e)
Microsoft 365 Recherche avec 2 critères pour non vide et somme
Réponses
5
Affichages
238
gpion
G
J
  • Question Question
XL 2019 index equiv avec fonction ou sur plusieurs feuilles
Réponses
11
Affichages
765
job75
M
  • Question Question
XL 2016 pb création de tableau par macro
Réponses
10
Affichages
343
ChTi160
D
  • Résolu(e)
Microsoft 365 Assistance pour optimisation d'un code VBA qui ne fonctionne pas comme souhaité
2
Réponses
21
Affichages
844
desto
D
F
  • Question Question
Microsoft 365 Problème RECHERCHEV avec plusieurs correspondances possibles pour une même valeur
2
Réponses
15
Affichages
709
floflatch22
F
  • Résolu(e)
Microsoft 365 Comment supprimer un espace entre deux chiffres ?
2
Réponses
18
Affichages
673
Staple1600
K
  • Question Question
XL 2010 copier le contenu de plusieurs feuilles sur une seule
Réponses
3
Affichages
326
sylvanu
  • Résolu(e)
XL 2016 En VBA, Automatiser la réponse en fonction de l'état d'une cellule.
Réponses
7
Affichages
745
piga25
S
  • Question Question
Microsoft 365 Consolider des données de plusieurs feuilles
Réponses
2
Affichages
393
Sissou71
S
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…