Fonction find de excel

Bonjour,
Je voudrai trouver la ligne de la cellule d'une feuille Excel contenant une valeur à partir d'un code vba Access.
Pour cela je fait

Code:

---

1 2 3

j = xlApp.Cells.Find(What:="DATE", 1, LookIn:=xlFormulas, _ LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:=False).Row

---

mais il m'indique que la méthode de la classe range n'existe quand la valeur ne se trouve pas dans la feuille, et la macro s'arrete ce que je ne veux pas.
Ainsi comment faire pour trouver une valeur.
Merci

bonsoir,

Essaie de décomposer :

Code:

---

1 2 3 4 5 6

Dim rg As Excel.Range   Set rg = xlApp.Cells.Find(What:="DATE", LookIn:=xlFormulas, _ LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:=False) If Not (rg Is Nothing) Then j = rg.Row

---

A+

bonsoir,
super ca marche très bien
merci pour ton aide.