Erreur d’exécution 91 -Variable objet ou variable de bloc with non définie

Bonsoir

Dans une feuille, j'ai crée une liste de mots

Dans la combobox, la liste apparaît. ....

Quand je veux rentrer un nouveau mot pour l'intégrer dans la liste existante, ou sélectionner un mot de la liste, j'ai une erreur sur la ligne 3 en italique ci-dessous avec cette indication

"Erreur d'exécution '91' -Variable objet ou variable de bloc With non définie

je ne comprends pas pourquoi ...la worsheet a intégré les données de la liste ...

cel et plage ont été définis et CBrue .Txt montre bien le mot sélectionné.....une idée ?

merci

Private Sub CBrue_Exit(ByVal Cancel As MSForms.ReturnBoolean)

Dim cel As Range, lig As Long, adr As String, plage as range

Set cel = plage.Find(CBrue.Text, , xlValues, xlWhole)

Sheets("Adresse").Select

j'ai trouvé mon erreur...supprimé la ligne Dim et fait une déclaration sous Option explicit avant la procédure... et ça marche