Range.Find avec valeur cherchée en variable texte (String)

Bonjour à toutes et à tous,

Je cherche une valeur texte qui ressemble à un nombre, par exemple "1234.00".

Les cellules de plage de recherche sont en format texte.

Mais si ce code trouve la bonne adresse:

Code:

---

1 2 3

Set oPl = Selection Set oCel = oPl.Find("1234.00") MsgBox oCel.Address

---

Celui-là renvoie une erreur car la cellule n'a pas été trouvée (oCel non initialisée):

Code:

---

1 2 3 4 5

Set oPl = Selection Dim str as String str = "1234.00" Set oCel = oPl.Find(str) MsgBox oCel.Address

---

Est-ce que quelqu'un-e sait pourquoi?

Cordialement

Bonjour

Si find n'aboutit pas oCel is nothing donc non affichable

Donc il faut tester

Code:

---

if not oCel is nothing

---

des pistes
- que contient selection ?
- si a la main, directement dans excel, tu faits une recherche de "1234.00" dans selection il trouve ? : ca peut être un probleme de format

Citation:

---

Envoyé par sogedic

des pistes
- que contient selection ?

---

Comme indiqué, le format de la place est du texte, mais ses cellules contiennent quatre chiffres, un point et deux zéros, soit quelque chose comme “####.00”

Citation:

---

Envoyé par sogedic

- si a la main, directement dans excel, tu faits une recherche de "1234.00" dans selection il trouve ? : ca peut être un probleme de format

---

Voilà, justement, c’est ce que je me demande. À la main (Ctrl+F), pas de problème.

… mais maintenant que j’y pense, je me demande si c’est pas bêtement un problème de sélection :?
(EDIT: ton premier tiret serait donc tout particulièrement pertinent sogedic :D)

Je réessaye demain matin et vous tiens au courant.

Merci pour vos réponses.

Cordialement

Citation:

---

Envoyé par 78chris

Bonjour

Si find n'aboutit pas oCel is nothing donc non affichable

Donc il faut tester

Code:

---

if not oCel is nothing

---

---

Pour te répondre 78chris, le problème n’est pas l’affichage du message, mais le fait que la méthode Find ne trouve pas la cellule.

Cordialement

En effet, j'avais oublié de systématiquement sélectionner la plage pour mes tests. :mrgreen:
À l'avenir, je définirai la plage sans Selection.
Désolé pour le dérangement.

Je retiens également

Code:

---

if not oCel is nothing

---

qui permet d'avoir un retour d'information à travers un message et non par une erreur, ce qui est moins alarmant.

Cordialement