Méthode Find VBA

[Amaze DJ]

Bonjour,

J'aimerais savoir si c'est possible de dire à VBA d'ignorer le fait que l'enregistrement demandé n'existe pas dans "selection.find" et de passer au suivant dans ce cas.

Merci!

 

[Zon]

Salut,

Pas sûr de tout comprendre mais si Find ne trouve rien tu ne risques pas à trouver qqch d'autre...
sinon peut être

Dim C As Range, Adres1$
with selection
set c = .Find("LAValeurRecherchée")
if not c is nothing then
adres1=c.address
Do 'là tu fais l'action que tu veux

...
loop while not C is nothing and C.address <> Adres1
end if
end with

A+++

 

[Amaze DJ]

MERCI beaucoup pour ton aide. Je vais essayer ça.