[XL-2007] affichage message avec fct recherche [Résolu]

[toushusss]

bonjour,
j'aurais voulu un renseignement concernant l'affichage d'un message avec une fonction recherche.

Code :

Set Tot = .Range("B2:B2000").Find(UserForm2.ListBox1.Text)

C'est la formule que j'utilise pour chercher un mot sur ma feuille excel a partir d'une ListBox. Je voudrais faire en sorte que si le mot n'est pas trouvé cela affiche une msgbox avec un texte . Merci de votre aide

[jfontaine]

Bonjour,

Si le mot n'est pas trouvé, la variable Tot sera vide

Code :

1
2
3
4
Set Tot = .Range("B2:B2000").Find(UserForm2.ListBox1.Text)
if Tot is Nothing then
    Msgbox "mot non trouvé"
end if

[toushusss]

merci jfontaine
Excelent ça marche