Index VBA Cells

Bonjour,

Je souhaiterai faire l'équivalent de la fonction Index sur VBA. Après quelques recherches, j'ai cru comprendre qu'il fallait utiliser utiliser la fonction Cells sur VBA.
J'ai codé

Code:

---

tarifBE = Worksheets("DATABASE").Range("D2:H60").Cells(prestation , prestataire)

---

Cela ne marche pas. Savez vous comment il faut coder ça ?


Merci d'avance,


Vince

Bonjour,

EDIT:

C'est ma faute j'ai mis une conner.... ^^

Soit

Code:

---

tarifBE = Application.Worksheets("DATABASE").WorksheetFunction.Index(Range("D2:H60"), prestation, prestataire)

---

Soit tu peux inclure directement la formule Excel dans une cellule (ou une variable)

Code:

---

1 2	ActiveCell.FormulaR1C1 = _ "=INDEX(DATABASE!D2:H60,MATCH(prestation,DATABASE!D2:H60,0),MATCH(prestataire,DATABASE!D2:H60,0))"

---

Je ne suis pas sur de la formule vu que je l'utilise très peu. j'espère que ca te donnera une piste. Desolé pour les idioties précédentes ^^

Cordialement

Merci pour ta réponse rapide.

ça marche toujours pas car il m'indique une erreur de type.
J'ai mis toutes les variables en Variant sachant que prestation et prestataire sont des chaines de caractères et que tarifBE est un nombre avec virgule.

L'erreur peut elle venir de là ?

Voici ce que j'ai et ça ne marche pas :cry:

Code:

---

tarifBE = Worksheets("DATABASE").WorksheetFunction.Index(Range("E2:E60"), Application.Match(prestation & detail & conditionnement, Range("D2:D60"), 0), 0)

---