Erreur fonction Excel dans macro

Bonjour à tous :salut:

Alors voilà, lorsque j'exécute la ligne suivante :

Code:

---

VTR = Application.WorksheetFunction.HLookup(Worksheets("IRingSol").Cells(1, j).text, Worksheets("BD_Substances").Range("B1:P12"), 4)

---

,

je reçois en retour ce message d'erreur : "Impossible de lire la propriété Hlookup de la classe WorksheetFunction".

En fait, le but est d'aller récupérer une valeur dans la bonne colonne, en fonction de l'intitulé cette colonne.

Je n'arrive pas à trouver d'où vient l'erreur. Quelqu'un pourrait-il m'aider?

Merci par avance.

Bonjour,

Essaye de remplacer ton ".text" par un ".value"

J'ai déjà essayé! le résultat est le même :roll:

Merci d'essayer de m'aider :lol:

Non, ce n'est pas cela, c'est parce qu'il ne trouve pas, mais le .TEXT ou le .VALUE sont inutiles.

Je cherche la parade. minute

Effectivement l'erreur apparaît lorsque la valeur cherchée n'est pas dans le tableau
Tu dois pouvoir utiliser "On Error" pour ignorer l'erreur

Voilà.

le problème c'est parce qu'il ne trouve pas.



Pour ton info, tu n'as pas spécifié le dernier parametre à FALSE, donc HLOOKUP assume que tu ne veux pas un excat match, donc tu récupères le nearest value, mais supposé que ton tableau est trié en ascending.

Je confirme, il ne faut pas le .TEXT, ni le .VALUE.

J'ai bidouillé un exemple sur mon poste de ton acs adapté à mon test file, et cela marche.

Code:

---

1 2 3 4 5 6 7

Sub testoex()   tr = Application.WorksheetFunction.HLookup(Worksheets("Sheet2").Cells(1, 2), Worksheets("Sheet1").Range("A1:A13"), 1) Debug.Print tr   End Sub

---

Si tu veux faire une recherche sur l'exact match, regarde le post suivant et tu trouveras comment gérer l'erreur qu'il rencontre si il ne trouve pas.

http://www.developpez.net/forums/sho...hlight=VLOOKUP
;)

Merci pour vos réponses!