Excel - ".Find" et gestion des exception

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...
Configuration: Windows XP
Internet Explorer 7.0

2 réponses

  • Votes
  • Date
  • Date décroissante
  1. Contributeur
    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"""

    1. Si je suis obligé d'en passer par là...pff ! Tant pis. Merci pour cette réponse.
      1. 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