XL 2010 Récupérer des données avec une condition

Oranger

XLDnaute Occasionnel

• 14 Août 2017

• #2

Bonjour,

Une proposition ci-jointe en utilisant une macro

Cdlt,

Oranger

 

Pièces jointes

• Copie de ClasseurEssai.xlsm

  931.8 KB · Affichages: 14

Vote positif 0 Vote négatif

chajmi

XLDnaute Occasionnel

• 14 Août 2017

• #3

Merci pour ta contribution Oranger.
Cela devrait me servir en dépannage.
Le problème c'est que je dois créer autant de feuille 1 que j'ai de fournisseurs et que je vais devoir adapter la macro pour chaque feuille.
J'aurais préférer travailler avec une formule dans les cellules à remplir.
Mais ta solution est déjà pas mal.

Merci à d'autres propositions
Cdlt

 

Vote positif 0 Vote négatif

phlaurent55

Nous a quittés en 2020

Repose en paix

• 14 Août 2017

• #4

Bonjour chajmi,

voir fichier joint

à+
Philippe

 

Pièces jointes

• 111.xlsm

  933.2 KB · Affichages: 13

Vote positif 0 Vote négatif

chajmi

XLDnaute Occasionnel

• 14 Août 2017

• #5

Bonjour phlaurent55

Ta solution a l'air de fonctionner, y compris quand je duplique la feuille 1.
La macro intégrée à la feuille concerne la feuille active, si j'ai tout compris ?
Si ce n'est pas trop abuser, pourrais expliquer chaque ligne du code intégré ?
Merci encore pour cette solution et le temps passé.

Cdlt

D'autres idées ? notamment par formule dans les cellules ?

 

Vote positif 0 Vote négatif

gosselien

XLDnaute Barbatruc

• 14 Août 2017

• #6

Bonjour,

A mon humble avis, il est préférable de donner un code UNIQUE et court à tes fournisseurs, comme ça on évite les fautes d'orthographe 🙂
dans le code de Philippe, je pense qu'il faut comparer en majuscule:

If UCase(.Cells(i, 7)) = UCase(Target) Then

P.

 

Vote positif 0 Vote négatif

chajmi

XLDnaute Occasionnel

• 14 Août 2017

• #7

chajmi à dit:

phlaurent55

Cliquez pour agrandir...

Ta solution est intéressante mais je n'arrive pas à l'adapter à mon fichier réel.
est ce que je peux te le transmettre en MP, pour m'aider à trouver ce qui cloche ?

J'ai intégré la remarque de Gosselin, mais ça ne fonctionne pas.

 

Vote positif 0 Vote négatif

gosselien

XLDnaute Barbatruc

• 14 Août 2017

• #8

re,

un essai 🙂

P.

 

Pièces jointes

• ClasseurEssai.xlsm

  934.9 KB · Affichages: 18

Vote positif 0 Vote négatif

phlaurent55

Nous a quittés en 2020

Repose en paix

• 14 Août 2017

• #9

Re,

............. et pourquoi pas une feuille par fournisseur

voir fichier joint

à+
Philippe

 

Pièces jointes

• 111.xlsm

  986 KB · Affichages: 15

Vote positif 0 Vote négatif

chajmi

XLDnaute Occasionnel

• 14 Août 2017

• #10

Lien supprimé
J'étais parti à la base par une feuille article par fournisseur, mais je suis revenu à 1 seule page article pour réduire le nombre de feuille.

 

Vote positif 0 Vote négatif

gosselien

XLDnaute Barbatruc

• 14 Août 2017

• #11

Tu as essayé ce que j'ai envoyé chajmi ?

 

Vote positif 0 Vote négatif

chajmi

XLDnaute Occasionnel

• 14 Août 2017

• #12

Oui ça marche très bien dans le fichier joint, mais je ne sais pas l'adapter à mon fichier réel.
Est ce que je peux t'envoyer celui-ci (non -anonymisé) en message privé ?

 

Vote positif 0 Vote négatif

gosselien

XLDnaute Barbatruc

• 14 Août 2017

• #13

Oui mais je dois partir dans peu de temps 🙁

 

Vote positif 0 Vote négatif

chajmi

XLDnaute Occasionnel

• 14 Août 2017

• #14

En fait Gosselin, j'ai réussi à faire fonctionner ta solution.
Est ce que je peux te transmettre mon fichier tout de même pour que tu puisses me conseiller sur d'autres fonctionnalités.
Si OK je te l'enverrai dans quelques jours, le temps de le fignoler.

Par contre je ne sais pas envoyer un Message Privé.

 

Vote positif 0 Vote négatif