Combobox vba et access objet requis 424
salut
c'est bizarre vraiment , pendant des semaines ce code marche très bien
ce matin il ne marche plus message d'erreur est : objet requis 424
malgré q'il lit qu' il la trouve dans le champs d' accès ( premier ligne)
voila un bref de ce code
Code:
1
2
3
4
5
6
7
8
9
10
11
12
|
con.ConnectionString = "Dbq= " & chemin & base & ".accdb;" & "Driver={Microsoft Access Driver (*.mdb, *.accdb)};"
con.Open
Set rs.ActiveConnection = con
rs.Open " Select * from unite ;"
While rs.EOF = False
frmpanne.Frame1.boxsite.AddItem rs.Fields("site")
'ici l'erreur qunat il devaint jaune , et je déplca la souris je lit la 1ére ligne de mon champs site
rs.MoveNext
Wend
rs.Close
Set rs = Nothing |
merci d'avance
