bonjour
soit une cellule contenant le mot "geôle", le code ci-dessous trouve la cellule en question. Le paramètre matchbyte associée à la commande find permet de chercher le mot exact ( geôle <> geole )
Set obj_cible = ActiveSheet.Cells.Find("geôle", LookIn:=xlValues, matchbyte:=True)
If Not obj_cible Is Nothing Then obj_cible.Select
bye
stephane