XL 2010 Comparaison de colonnes avec plusieurs sources excel

Bantho · 29 Mai 2019

bonjour à tous

Voici un exemple. Ils nous arrivent d'avoir un fichier de 15.000 lignes et d'une quarantaine de colonne d'un fournisseur. 2 Mois plus tard, il peut nous demander de re-faire une mise à jour du même fichier. Le soucis, sur les 15.000 lignes, il est possible qu'il y est uniquement 4 produits qui ont été rajoutés ou 3 prix qui ont été modifiés. A ce jour, au lieu de nous occuper de ces 4 produits ... on recommence à zero la mise à jour de tout le fichier pour être sur de ne rien louper.
Y'a t'il un moyen de repérer les réf ajoutées ou supprimées et repérer les modifications des valeurs se rapportant à cette réf s'il y a lieu ?

Un énorme merci pour votre aide précieuse et de votre implication

Bonne fin de journée à tous
Anthony

don_pets · 29 Mai 2019

Hello,

voici un petit code à adapter mais qui je le pense répond à ton besoin

VB:

a = Range("A2:A" & [A65000].End(xlUp).Row)
Set MonDico1 = CreateObject("Scripting.Dictionary")
    For Each c In a
    MonDico1(c) = ""
    Next c
b = Range("B2:B" & [B65000].End(xlUp).Row)
Set MonDico2 = CreateObject("Scripting.Dictionary")
    For Each c In b
        If Not MonDico1.exists(c) Then MonDico2(c) = ""
    Next c
[F2].Resize(MonDico2.Count, 1) = Application.Transpose(MonDico2.keys)

dans cet exemple tu as une liste en colonne A, une autre en colonne B et en F2 tu as le résultat listeB-ListeA (en gros seules restent les données en B non présentes dans la liste A)

Enjoy

Bantho · 3 Juin 2019

Super Merci beaucoup
On va tester tout cela et je te tiens au courant.
Merci pour tes recherches

XL 2010 Comparaison de colonnes avec plusieurs sources excel

Bantho

XLDnaute Nouveau

Pièces jointes

don_pets

XLDnaute Occasionnel

Bantho

XLDnaute Nouveau

Discussions similaires