Excel - ".Find" et gestion des exception

java88.xls -  
 diaoularnoz -
Bonjour,

Je suis en train d'écrire un macro Excel dans laquelle, j'ai besoin de rechercher une valeur dans un ensemble de cellules.
Exemple: chercher A dans l'ensemble de cellules contenant A / B / C.
en utilisant la fonction .Find, je ne suis pas satisfait du résultat car si je n'ai pas A dans les celulles dans lesquelles je cherche ça "merdoie" [ie, le prog s'arrete sur une exception].

Suis-je obligé de gérer l'exception ou dans la fonction .Find il y aurait qqch de magique qui fait que ca plante pas si je n'ai pas A dans l'ensemble de cellule ou mieux: existe t'il autre chose que FIND ?

Bien bonne soirée...
A voir également:

2 réponses

michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 318
 
Bonjour,

petite remarque: tu dois TOUJOURS gérer une erreur...

exemple: on ne trouve pas de "X" dans A1:A16

On Error GoTo erreur
lig = Range("A1:A16").Find("X", Range("A6536")).Row
erreur:
MsgBox "pas de ""X"""

0
java88.xls
 
Si je suis obligé d'en passer par là...pff ! Tant pis. Merci pour cette réponse.
0
diaoularnoz
 
A partir de l'exemple de michel_m:

Dim result As Range

Set result = Range("A1:A16").Find("X")

If result Is Nothing Then
Msgbox "X non trouvé"
Else ' X existe et se trouve dans la cellule result
Msgbox result.Address(True,True)
End If
0