.find et valeur recherchée

Bonjour à tous,

J'essaye d'utiliser la methode .find en VBA.

Quand je fais :

Code:

---

Set actual_range = .Find("x", lookat:=xlWhole)

---

ça marche très bien.

Dès lors, pourquoi donc

Code:

---

1 2	ref_val = Sheets("feuil1").Range("A1").Value Set actual_range = .Find(ref_val, lookat:=xlWhole)

---

ne marche pas ??
J'ai bien vérifié avec une MsgBox, ref_val est bien un string.
Avez-vous une idée ?

Merci d'avance, et bonne fin de journée

Bonjour actuenligne,

Voici un exemple avec une recherche de ref_val dans la colonne B.

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Sub Test() Dim ref_val As String Dim actual_range As Range   ref_val = Sheets("Feuil1").Range("A1").Value   With Worksheets("Feuil1").Range("B:B") Set actual_range = .Find(ref_val, LookIn:=xlValues) MsgBox "Trouvé : " & actual_range End With End Sub

---

Cordialement.

Ah, c'était donc ce LookIn:=xlValues qui me manquait !
Merci beaucoup gFZT82, et merci aussi d'avoir pris le temps
de me montrer un exemple.

Bonne journée !