Discussion :

[Dédé6621]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[78chris]

Bonjour

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

Donc il faut tester

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

if not oCel  is nothing

[sogedic]

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

[Dédé6621]

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”

- 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 )

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

Merci pour vos réponses.

Cordialement

[Dédé6621]

Bonjour

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

Donc il faut tester

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[Dédé6621]

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

Je retiens également

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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