XL 2016 procédure pour connaitre le prix du produit que je tape

beginner35

XLDnaute Nouveau
Hello tout le monde,

J'ai une liste de produits qui ont des noms propres et des prix.
J'aimerais créer un module où dès que je rentre un nom de catégorie (InputBox) issu d'une liste mise sur Excel (par exemple "A-34") et bien ça m'affiche en MsgBox le prix que je veux (et qui est mentionné sur une liste excel, cf le fichier)
Sachant que j'ai un tableau à 2 colonnes (colonne produit, colonne prix)
J'aimerais mettre des InputBox et des MsgBox et je réfléchissais à mettre une fonction Array

un truc du genre que j'ai tenté:

Sub Px()
Dim Prix As Double
Prix = Array("B2", "B3", "B4", "B5", "B6", "B7", "B8", "B9")
MsgBox ("le prix du produit est " & Prix)

End Sub


cf le fichier
Qu'en pensez vous et comment auriez-vous procéder ?
 

Pièces jointes

  • Book1.xlsx
    8.9 KB · Affichages: 7

herve62

XLDnaute Barbatruc
Supporter XLD
Désolé je viens de supprimer mon post à cause d'une erreur ; cela refonctionne mais je remet pas ! car pas ton souhait
là à la rigueur je pense qu'il faudrait définir une plage à 1 colonne (prod) faire un for Each prod in ........
si ok avec la valeur inputbox alors faire un offset de 1 col. pour mettre dans var 'prix' et faire le msgbox
 

Discussions similaires

Statistiques des forums

Discussions
312 178
Messages
2 085 980
Membres
103 079
dernier inscrit
sle