Rechercher

[LaurentG]

Bonjour,

J'utilise le code suivant pour rechercher une donnée dans un classeur :

Set atrouve = Workbooks('login_extract.xls').Worksheets('feuil1').Cells.Find(numerobv, LookIn:=xlValues, searchorder:=xlByRows)

Quand il ne trouve pas la donnée recherchée la variable 'atrouve' prend la valeur de 'Nothing'.

J'aimerai mettre une condition dans la suite du code afin que si atrouve est null alors il quitte la macro. J'ai essayé :

if atrouve = Nothing then Exit sub

Mais il me met un message d'erreur par rapport au nothing. Quelqu'un saurait me dire ce qu'il faut que je mette à la place?

Merci

Laurent

 

[Hervé]

Bonjour laurent

essaye comme ceci :

If atrouve Is Nothing Then Exit Sub

salut