Index+équiv en vba

phlaurent55

Nous a quittés en 2020

Repose en paix

• 10 Septembre 2017

• #2

Bonjour Dudesson,


Sans code, avec cette formule à mettre en H2 de la feuil1 (à recopier vers le bas)

=SI(ET(G2<>"";NON(ESTNA(RECHERCHEV(G2;Stocks!$C$4:$E$14;3;0))));RECHERCHEV(G2;Stocks!$C$4:$E$14;3;0);"")

Cliquez pour agrandir...

à+
Philippe

 

Pièces jointes

• 111.xlsx

  18.4 KB · Affichages: 32

Vote positif 0 Vote négatif

D

Dudesson

Guest

• 10 Septembre 2017

• #3

Merci pour votre réponse.
Mais une solution avec formule dans les cellules de la colonne H sera écrasée systématiquement vu que les données de feuil1 sont importées via Vba depuis un autre classeur.
Le fichier exemple est très simplifié.
Cordialement.
Dudesson.

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 10 Septembre 2017

• #4

Bonjour Dudesson
Salut Philippe

Un essai

 

Pièces jointes

• fichier c.xlsm

  29.9 KB · Affichages: 18

Vote positif 0 Vote négatif

D

Dudesson

Guest

• 10 Septembre 2017

• #5

Bonjour @Philippe,@Pierre,
Bonjour le forum,
Ça marche dans les zones actuelles sur les deux feuilles mais après ajout de nouveaux numéros + stock sur la feuille "Stocks" et numéros correspondants sur "feuil1" , le code ne trouve pas le stock.
Cordialement.
Dudesson.

 

Pièces jointes

• Copie de fichier c.xlsm

  31.9 KB · Affichages: 13

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 10 Septembre 2017

• #6

Re

Cela provient du fait que les Numéros ajoutés sont au format Texte
J'ai modifié pour comparer les formats texte des 2 feuilles

 

Pièces jointes

• Copie de fichier c.xlsm

  32 KB · Affichages: 23

Vote positif 0 Vote négatif

D

Dudesson

Guest

• 10 Septembre 2017

• #7

Tout simplement génial !
Mes sincères salutations et remerciements.
Cordialement.
Dudesson.

 

Dernière modification par un modérateur: 10 Septembre 2017

Vote positif 0 Vote négatif