Probleme de recup de donnees
kikou
je narrive pas a faire fonctionner mon code
le voisi
Private Sub bo_maj_Click()
Dim dbs As Database, rst As DAO.Recordset
Dim xl_app As Excel.Application
Dim objexcel As Object, xl_feuille As Object
With xl_app
Set objexcel = Appli.Workbooks.Open(App.Path & "\projet.xls")
Set xl_feuille = objexcel.sheets("feuille2")
End With
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("LIGNE DE FACTURE")
rst.Edit
rst![Kilometrage] = xl_feuille.range("C3").Value
rst.Update
xl_app.activeworkbook.Close
xl_app.Quit
Set xl_app = Nothing
Set objexcel = Nothing
End Sub
ca me met une erreur au niveau de la ligne set objexcel...
erreur d'execution 424
objet requis
si quelqun voi le probleme merci de m'aider.
a tres vite jespere.
merci
--
toubiiiiiiiiiiiiloooooooooooooouuuuuuuuuuuuuuuuuuuuuupppp
je narrive pas a faire fonctionner mon code
le voisi
Private Sub bo_maj_Click()
Dim dbs As Database, rst As DAO.Recordset
Dim xl_app As Excel.Application
Dim objexcel As Object, xl_feuille As Object
With xl_app
Set objexcel = Appli.Workbooks.Open(App.Path & "\projet.xls")
Set xl_feuille = objexcel.sheets("feuille2")
End With
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("LIGNE DE FACTURE")
rst.Edit
rst![Kilometrage] = xl_feuille.range("C3").Value
rst.Update
xl_app.activeworkbook.Close
xl_app.Quit
Set xl_app = Nothing
Set objexcel = Nothing
End Sub
ca me met une erreur au niveau de la ligne set objexcel...
erreur d'execution 424
objet requis
si quelqun voi le probleme merci de m'aider.
a tres vite jespere.
merci
--
toubiiiiiiiiiiiiloooooooooooooouuuuuuuuuuuuuuuuuuuuuupppp
5 réponses
-
Cher ami, veuiller bien vérifier si le projet excel que tu tente d'ouvrir existe réelement!
-
kikou
merci de repondre a mon appel o secours
je te rassure mon projet existe
mais g essayer je ne c combien de truc et rien ny fait
je me demande si ya pas un pb de bibliotheque mais je n'en sait rien
g 4 jour pour resoudre se probleme alors merci de m'aider au plus vite je vous en pris s'il vous plait
merci d'avance. -
Bonjour à tous
Il y'a une semaine mon amie démarait son ordinateur avec difficulté aujourd'hui elle n'arrive plus à axcèder à internet ni dans ses programmes, elle a un pentium4, Windows EX et réseau free.
Y'a t-il une personne qui pourait me conseiller merci?
Halima-
kikou
ton amie a peu etre recuperer un virus
verifie si son firewall et son antivirus
fait des scandisk du disque dur
un verifie les cables de connexion internet (mais sa doi po etre sa)
verifie que le disque dur n'est po hors service
si tu as un crash disque il ne demarrera plus si c le cas il fo en racheter un.
sinon verifie la place qui reste sur le disque dur
s'il n'est po plein
ou verifie le modem il est pe etre casse ou en mauvaise etat de marche test le chez quelqu'un d'autre.
voila c tout pour l'instant
recontact moi si ta tjrs ddes pb.
a bientot
-
-
bonjour
merci de respecter les posts des autres et d'en ouvrir un autre quand on veut parler d'un autre sujet!! -
Bonsoir à tous,
Je voulais remercier tous ceux qui m'ont donné des conseils à propos des problèmes concernant l'ordinateur de mon amie...
A présent, je ne l'ai pas encore réparé, mais je vous donnerai des nouvelles dés que c'est fait.
Abientôt.
