VBA Recherche dans table

[C@thy]

Bonjour le forum,

je suis en plein dans le VBA et ...je coince!!!
Alors j'ai besoin d'un petit coup de pouce (pas de pied!!!)...

J'ai dans un fichier (différent de celui où est la macro) une table des indices.
j'ai en colonne 2 de ma table un taux horaire à appliquer

en colonne 1 :
0
280
300
320
340
360
380
400
415

par exemple si j'ai un indice de 335 je dois récupérer le taux de la ligne 4.

Ca, je sais faire en formule, avec RECHERCHEV, mais je n'ai pas réussi à
faire fonctionner un VLOOKUP en VBA.

J'ai bien pensé à 8 case mais c'est hyper "relou" comme dit mon filleul.

Quelqu'un peut-il venir à mon aide???

Merci d'avoir lu ma question et de vous intéresser à mon problème.

Biz à toutes et tous

C@thy

 

[@+Thierry]

Coucou C@thy,

Vraiment vite fait, car on a un Cocktail pour l'Euro (Compagnie Greque !!! hihihi)

Juste un début de Macro pour la Syntax :

Sub TestCathy()
Dim MyRange As Range
Dim Taux As Double, Indice As Double

Set MyRange = Workbooks("Toto.xls").Range("A2😀50") '(pas compris ton tableau)

Indice = ActiveCell.Value

Taux = Application.WorksheetFunction.VLookup(Indice, MyRange, 4, True) '(Colone 4...?)

MsgBox Taux

End Sub

Garantie sans aucun test, mais pour voir si tu peux avancer, je file !
Bizz
@+Thierry

 

[C@thy]

Hips! Thierry, bon pot! T'as bien fait de m'écrire avant! Hips!

J'ai adapté ton code à mes données, et là ça a coincé :

Set MyRange = Workbooks("Tabhorus.xls").Range("A1😀8")
message "propriété ou méthode non gérée par cet objet"

mais comme ça c'est OK :

Set MyRange = Workbooks("Tabhorus.xls").Worksheets(1).Range("A1😀8")

Merciiiiiiiiiiiiiiiiiiiiiiiiiiiiiii Thierryyyyyyyyyyyyyyyyyyyyyyyyyyy!!!

Je suis bien contente que ce soient les grecs les vainqueurs de l'Euro, sinon
on aurait eu l'air de quoi??? (oui, de toute façon....!!!... no comment!)

Biz

 

[@+Thierry]

Ooooops !! lol

ou plutôt Hiiiiiiiiiiiiiiiiiiiips (re LOL !!)

Zavais Zappé l'objet WorquéSheetas (lol) mais tou as vou (avé lascent Portuguez !!)

Mort de Rire
Bizz
@+Thierry

 

[C@thy]

Si, yé vou!!! obrigada!!!
FKristo Thierrysopoulos!!!!