Problème avec mon Adodc

Bonjour!
J'essaie de faire une requete avec mon adodc mes en vain
Voici un bout de code de mon application :

Var_Adodc est de type ADODB.Recordset et est defini dans un module
AdodcEnseignant est lenom de l'Adodc qui est sur ma feuille

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

Private sub Form_Load Set Var_Adodc = frmEnregEns.AdodcEnseignant.Recordset end sub   --------- Private Enregistrer_click() .... AdodcEnseignant.Recordsource ="Select * from Enseignant Where CodeEns="& txtEnsNum&"" AdodcEnseignant.Refresh .....   with Var_Adodc .AddNew 'On fait les affectations end with AdodcEnseignant.Refresh end sub

---

J'ai l'erreur suivant :
Erreur d'exécution '91' : Variable objet ou variable with non definie
Merci de m'aider

l'erreur elle est sur qu'elle ligne..?

est que tu as declarer ta variable Var_Adodc

ou alors est que tu as intencier cette variable, un truc du genre

Code:

---

set Var_Adodc = new ADOBD.recordset

---