question sur FIND et FOR EACH ... LIKE

bonjour à tous,

Je butte sur la fonction recherche: FIND
J'ai une variable : TEMP qui prend plusieurs valeurs.
je dois chercher chacune de ces valeurs dans un fichier Excel et renvoyer la ligne associée.
Jusque là pas de problème.
Ce qui m'embête plus c'est que TEMP peut ne pas être dans le fichier.
Alors lorsque j'utilise la fonction FIND et que je lance ma macro si la valeur ne se trouve pas dans le fichier cela me renvoie une erreur de compilation 91.

Question: comment ignorer cette erreur et gérer le fait que FIND n'aboutis pas ?

J'ai bien essayé de passer par la fonction FOR EACH ... LIKE mais la encore je butte:

Code:

---

1 2 3 4 5 6

For Each c In [A1:AA200] If c.Value = temp '= test ou TEST temp = c.Row End If Next

---

Ma variable TEMP peut être en minuscule ou pas dans le fichier.
Quelle instruction mettre dans la fonction FOR EACH pour spécifier de ne pas respecter la casse?

Merci par avance à tous pour vos réponses.:ccool:

M.A.S

Salut,
Une astuce de contournement:

Passe les caractères récupérés par la cellule en majuscule, idem pour ta variable Temp, donc:

Code:

---

1 2 3 4 5

For Each c In [A1:AA200] If ucase(c.Value) = ucase(temp) 'Ucase te permet de renvoyer toujours TEST et plus Test ou même test ou encore TeSt, ou encore... temp = c.Row End If Next

---

A+

bjr,

Pour le Find, il faut récupérer le Range et vérifier s'il vaut Nothing :

Code:

---

1 2 3 4 5 6 7 8

Dim lFind As Range Set lFind = Sheets("Feuil1").Range("A:A").Find("test") If lFind Is Nothing Then MsgBox "non trouvé" Else MsgBox "non trouvé en adresse: " & lFind.Address End If

---

merci à tous pour votre rapidité et précision !
Que du bonheur ce forum... :mouarf: