Extraire des informations dans une feuille sur base d'une référence

Bonjour à toute la communauté,

Permettez-moi de partager avec vous mon cas de figure avec le souhait d'utiliser la méthode la plus simple ayant le moins de manipulation possible.

Dans le premier onglet, j'ai une entrée (données entrantes) avec comme information, :

Réf ; Quantité ; Date

Dans le second onglet, j'ai ma base de donnée avec comme information :

code-barres ; Réf ; quantité ; date de dernière sortie

La clé commune entre les deux fichiers est donc la réf.

L'objectif que je souhaite atteindre est le suivant :

En fonction de la réf et la quantité souhaitées dans le premier onglet (données entrantes), c'est de ne garder que le nombre de codes-barres suffisant avec la ou les date(s) la(es) plus ancienne(s) pour compléter la quantité du premier onglet.

Ce résultat devra apparaitre dans un troisième onglet (données sortantes)

Quelle méthode pensez-vous la plus simple ? Formule ? Power Query ? Ou Macros ?

Merci pour votre aide précieuse

Amicalement,

Bonjour,

Je ne sais pas si tu t'es relu mais pour moi c'est incompréhensible.

Un classeur avec une base de donnée bien plus restreinte, mais avec le résultat à obtenir sur la troisième feuille serait plus parlant que ses explications compliquées.

A+

Bonjour,

Au temps pour moi, je pensais que s'était clair , pas facile d'expliquer la situation

Voici le fichier modifié, avec le résultat dans le troisième onglet.

Merci

Gundal

Désolé je ne comprend toujours pas. Peut-être que quelqu'un avec des neurones plus développées...

A+

Bonjour

Pourriez-vous éditer le titre de votre sujet afin qu'il corresponde un temps soit peu à votre souci.

Au besoin lisez ces quelques lignes si vous ne l'avez pas encore fait lors de votre inscription https://forum.excel-pratique.com/excel/a-lire-avant-de-poster-charte-du-forum-et-informations-utiles...

En reprenant votre premier post en cliquant sur le petit crayon en haut à droite, vous pouvez éditer votre titre et message

Merci de votre participation

Cordialement

Bonjour,

Désolé mais je n'ai plus le crayon qui apparait pour modifier le titre.

Je vais essayer d'être plus explicite avec l'exemple de la référence suivante : 3019858X01

Dans le premier onglet, nous avons le besoin (donnée entrante) qui est de 3800 pcs.

Dans l'onglet suivant "Base de donnée", nous retrouvons cette même référence mais avec plusieurs codes-barres avec une quantité de 200 pour chaque code-barres

La finalité du troisième onglet est de faire en sorte que nous retenons l'ensemble des codes-barres avec la date la plus ancienne afin d'atteindre les 3800 pcs et supprimer les autres codes-barres de cette même référence soit le résultat ci-dessous :

Je vous ai indiqué le total pour bien comprendre.

Voilà en espérant que ce soit plus clair pour vous.

Gundal

Que se passe-il si on ne trouve pas la quantité exacte... Parce que j'imagine que c'est la première chose qu'il faudra modifier donc autant le dire tout de suite ça évitera de gamberger pour rien !

On pourrait aussi se demander si les dates doivent aussi être vérifiées ? Quid des lignes qui n'ont pas de dates dans la BD ?

En attendant ta réponse je te donne déjà une solution VBA :

A+

Bonjour Galopin01,

Un grand merci pour ton travail rapide et efficace .

Pour répondre à tes questions, en cas de quantité non identique, il faut arrondir à la quantité supérieure du code-barres.

Et lorsque la date n'est pas présente, le code-barres est prioritaire par rapport aux autres dates.

Merci je vais maintenant essayer de comprendre ta macro

Gundal

Pour "arrondir à la quantité supérieure" modifier comme suit :

If Qtmp >= QW Then

Au top Monsieur !!

Merci encore pour votre aide.

Gundal

Bonjour Galopin01,
Juste une chose, je m'aperçois que la macro respecte la casse, Minuscule / Majuscule pour les références et de ce fait les mêmes références avec un x minuscule et un X majuscule dans la référence ne s'affiche pas dans le résultat final.

Sais-tu à quel niveau de la macro, je peux modifier cela ?

Merci

Gundal

Bonsoir,

Avant la Macro mettre :

Option Explicit
Option Compare Text
Dim rng As Range, Ws As Worksheet

A+

Au top !

Merci

@+