XL 2013 conversion en vba

KHEROUBI

XLDnaute Junior
bonjour,
J'ai une question c'est : es ce qu'on peut convertir la formule : SI(B6="";"";RECHERCHEV(B6;DECALER(Tableau_Produit;0;0;NBVAL(Tableau_Produit)-1);3;FAUX))
en VBA
voici un fichier comme exemple.
Merci
 

Pièces jointes

  • Classeur2.xlsm
    19.6 KB · Affichages: 13

Dranreb

XLDnaute Barbatruc
Bonsoir.
Déjà elle me semble inutilement compliquée votre formule. Comme ça elle marche tout aussi bien :
Code:
=SI(B2="";"";RECHERCHEV(B2;Tableau_Produit;3;FAUX))
À part ça, "en VBA", c'est vague: vous parlez d'une fonction personnalisée qui ferait la même chose ou bien d'une procédure qui mettrait toutes les correspondances en dur ?
 

job75

XLDnaute Barbatruc
Bonsoir KHEROUBI, Bernard, Dudu2,

La formule est inutilement compliquée, on entrera plutôt en Feuil2!C2 :
Code:
=SIERREUR(RECHERCHEV(B2;Tableau_Produit;3;FAUX);"")
En VBA on peut entrer la formule sur la plage C2:C16 :
VB:
[C2:C16] = "=IFERROR(VLOOKUP(B2,Tableau_Produit,3,FALSE),"""")"
A+