Microsoft 365 supprimer doublon + calcul + date la plus courte.

[DAVID-44-]

Bonjour à tous,
Je souhaiterais supprimer les doublons d'un fichier, en calculant la somme totale de ceux-ci et en gardant la date la plus courte !
Si quelqu'un peut m'aider avec un code, je l'en remercie par avance.
Bien cordialement,
David.

 

[vgendron]

Bonjour

c'est quoi un doublon dans ton exemple??
la quantité est différente sur chaque ligne..
si tu veux la ligne de la date la plus courte (la plus proche d'aujourd'hui, je présume) il suffit de trier par date en ordre croissant, et c'est la première..?

 

[sousou]

Bonjour
les doublons sur quelles colonnes du tableau?
La date la plus courte, c'est la date la plus ancienne?
Dans ton fichier il n'y a que des doubles, est-il représentatif?

 

[DAVID-44-]

Bonjour vgendron et sousou,
Excusez-moi de ne pas avoir été suffisamment clair dans ma demande.
Je vous ai mis le résultat souhaité dans ce nouveau dossier.
Merci de votre aide.

 

[vgendron]

tout simple
en I15 =min(I4:I8)
et en G15 = somme(G5:G8)

bon après.. suis quasi certain que ton fichier exemple n'est pas du tout représentatif du fichier reel...

 

[DAVID-44-]

tout simple
en I15 =min(I4:I8)
et en G15 = somme(G5:G8)

bon après.. suis quasi certain que ton fichier exemple n'est pas du tout représentatif du fichier reel...

Oui vous avez totalement raison, je voulais plus un code vba pour l'intégrer dans mon classeur.

 

[DAVID-44-]

Bonsoir à tous,

J'essaye de trouver une solution et j'avoue être bien perdu !
Je vous transmets un nouveau fichier avec un code vba, mais la solution*, que j'ai modifiée, est loin d'être trouvée.
Les doublons sont supprimés, mais la colonne "B" reste et je ne sais pas comment additionner les quantités !?
Merci pour votre aide.
Bien cordialement,
David.
* j'ai copié le code 😉

 

[Cousinhub]

Bonsoir,
Pour obtenir ce résultat, je n'utilise pas de VBA, mais Power Query (en 3 clics dans la requête)

Si cela t'intéresse, bien sûr

 

[job75]

Bonsoir à tous,

Voyez le fichier .xlsx joint et les formules du tableau K4:R46.

La seule formule un peu compliquée (mais classique) est celle (matricielle) en L4 :

=SIERREUR(INDEX(C:C;PETITE.VALEUR(SI(ESTTEXTE(C$4:C$46)*NON(NB.SI(L$3:L3;C$4:C$46));LIGNE(C$4:C$46));1));"")

Vous nous les brisez menues avec la date la plus courte !

A+

 

[job75]

Ma solution suppose que pour chaque produit il n'y a qu'un seul fournisseur, un seul type, un seul groupe.

Rien ne laisse supposer le contraire dans votre fichier.

 

[job75]

Si maintenant pour chaque produit il peut y avoir plusieurs fournisseurs, types ou groupes on utilisera les colonnes auxiliaires B et L que l'on masquera.

La formule (matricielle) en L4 est la même qu'au post #9.

Pour masquer les valeurs zéro des autres colonnes j'ai décoché la case adéquate dans les options avancées (menu Fichier =Options).

 

[DAVID-44-]

Bonjour Cousinhub et Job75,
Merci beaucoup pour votre aide.