Doublon avec condition entre 2 feuilles Excel [Résolu/Fermé]

Signaler
Messages postés
98
Date d'inscription
lundi 2 octobre 2017
Statut
Membre
Dernière intervention
1 juillet 2019
-
AstraLife
Messages postés
98
Date d'inscription
lundi 2 octobre 2017
Statut
Membre
Dernière intervention
1 juillet 2019
-
Bonjour,

Je souhaite traiter des doublons sur la colonne A (Nº de commande) et cela entre 2 feuilles mais sur une condition qui se trouve être « le statut » de la commande.

Je m’explique,

La feuille 1 comporte toute les commandes à imprimer de la veille. Tous les matins je réalise un export dans la feuilles 2 pour récupérer les nouvelles commandes à imprimer ainsi que l’état de toutes les autres, anciennes commandes qui ont put êtres imprimées la veille ou jusqu’à deux mois d’historique.

Je sais traiter les doublons sur le Nº de commande
mais comment faire pour que dans ma feuille 1, seule les commandes à imprimer soient conservées ?

Un exemple :

Aujourd’hui sur la feuille 1, j’ai la commande Nº200 à imprimer
Demain, quand je collerais mon export en feuille 2, j’aurais aussi la commande Nº200 mais cette fois avec le statut (imprimée) ou bien peut être encore le statut à imprimer.

Je souhaiterai donc que la feuille 1 supprime cette commande si elle a le statut « imprimée », mais que si dans ma feuille 2 j’ai encore un statut (a imprimer) la feuille 1 conserve cette commande.

Le but est de ne conserver en feuille 1, de l’export collé en feuille 2, seulement les nouvelles commandes et de purger les commandes déjà imprimée de la feuille 1, le statut imprimée vient de l’export et non de la feuille 1.

J'ai réalisés plusieurs tuto sur les doublons mais je n'arrive pas à les adapter à ce que je souhaite faire.

Si toute fois quelqu’un a un début d’aide un grand merci.

Mon fichier Excel comporte 2 feuilles avec les mêmes colonnes de A à P.
Les N° de commande sont en colonne A et le statut en colonne M.

Mon fichier : https://cjoint.com/c/HIegoU5lUhQ

1 réponse

Messages postés
652
Date d'inscription
lundi 22 septembre 2008
Statut
Membre
Dernière intervention
15 janvier 2020
106
Bonjour,

Teste avec une double boucle qui compare les deux valeurs de la colonne A et qui supprime en feuil 1 si la colonne M est notée "Imprimée"
Sub extract()
Dim Ws As Worksheet
Dim Wd As Worksheet
Dim i%, j%, DlWs%, DlWd%

Set Ws = Sheets("Feuil1")
Set Wd = Sheets("Feuil2")
DlWs = Ws.Range("A" & Rows.Count).End(xlUp).Row
DlWd = Wd.Range("A" & Rows.Count).End(xlUp).Row
For i = 2 To DlWs
For j = 2 To DlWd
If Ws.Cells(i, 1) = Wd.Cells(j, 1) And Wd.Cells(j, 13).Value = "Imprimée" Then
Ws.Rows(i).Delete shift:=xlUp
End If
Next j
Next i
End Sub
M-12
Messages postés
652
Date d'inscription
lundi 22 septembre 2008
Statut
Membre
Dernière intervention
15 janvier 2020
106
Re,
Dans ce cas, tu auras des doublons
AstraLife
Messages postés
98
Date d'inscription
lundi 2 octobre 2017
Statut
Membre
Dernière intervention
1 juillet 2019
> M-12
Messages postés
652
Date d'inscription
lundi 22 septembre 2008
Statut
Membre
Dernière intervention
15 janvier 2020

Ok, merci beaucoup de ton aide,

Je vais donc enlever la gestion de la date,
Je saisirais manuellement dans la feuille 1 la date en colonne Q chaque jour pour les nouvelles commandes qui proviendrons de la feuille 2, je devrais les repérer facilement, c'est maxi une vingtaines de commandes nouvelles par jour.
AstraLife
Messages postés
98
Date d'inscription
lundi 2 octobre 2017
Statut
Membre
Dernière intervention
1 juillet 2019
> AstraLife
Messages postés
98
Date d'inscription
lundi 2 octobre 2017
Statut
Membre
Dernière intervention
1 juillet 2019

Je viens de penser à un truc, si à la fin de la procédure je boucle pour chercher les seules commandes sans date dans la feuille 1, ce sont forcément les dernières commandes collées par le code, je n'ai plus qu'à y faire mettre la fameuse date du jour.
M-12
Messages postés
652
Date d'inscription
lundi 22 septembre 2008
Statut
Membre
Dernière intervention
15 janvier 2020
106
Re,

J'ai du mal à tout te comprendre

teste
https://www.cjoint.com/c/HIfluRrNl4u
AstraLife
Messages postés
98
Date d'inscription
lundi 2 octobre 2017
Statut
Membre
Dernière intervention
1 juillet 2019
> M-12
Messages postés
652
Date d'inscription
lundi 22 septembre 2008
Statut
Membre
Dernière intervention
15 janvier 2020

Ton fichier fonctionne parfaitement mais le mien non, j'ai repris ton fichier en collant toutes les commandes et la cela ne fonctionne plus, cela écrase toutes les anciennes date de la colonne Q de la feuille 1 alors que dans ton fichier avec seulement quelques lignes ça fonctionne.


ton fichier d'aide avec la totalité des commandes

https://www.cjoint.com/c/HIfnm0Ci03c

C'est trop étrange ça, une fois la macro exécutée la commande avec le statut imprimée est bien supprimée de la feuille 1 mais la commande en dessous la N° 2097224 est supprimée elle aussi de la feuille 1 et un doublon de la commande N° 2096789 est créé en feuille 1. J'ai eu du mal à le voir car cela fait toujours le même nombre de commande.