[VBA] gestion erreur sur un MATCH

[F22Raptor]

Hello,
Je cherche à faire une action si on trouve "TOTO" dans une cellule de la ligne 8.
J'utilise donc un MATCH.
Problème : si TOTO n'existe pas, ça plante.
Je ne peux donc pas faire un : IF LEN(MATCH(......)) = 0 THEN

J'ai trouvé la méthode suivante, mais que je trouve un peu lourde ...
Une autre idée ?

    On Error Resume Next
    Err.Clear
    Erreur = Application.Match("TOTO", Rows(8), 0)
    If Err.Number = 0 Then
    blablabla

 

[Paf]

Re : [VBA] gestion erreur sur un MATCH

Bonjour,

A mon avis pas d'autre solution que de tester s'il existe un résultat avant d'y affecter des instructions.

Une autre solution (Très proche):

If Not IsError(Application.Match("TOTO", Rows(8), 0)) Then
    ...
End If

A+

 

[F22Raptor]

Re : [VBA] gestion erreur sur un MATCH

Et Paf !

Merci 😀