Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jessy Sempere [MVP]
Bonjour
Vérifies que tu as bien la référence : Microsoft DAO x.xx Object Library Et sinon, essais en mettant :
Dim Resultat as DAO.Recordset
PS : Si tu veux toutes les données de Table1, tu peux directement mettre : Set resultat = CurrentDb.OpenRecordset("Table1")
@+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------ "pierref" a écrit dans le message news:
Bonjour,
Je souhaite executer une requete dans mon code vba. J'ai écrit la requete suivante dans l'evenement click d'un bouton:
Dim resultat As Recordset
Set resultat = CurrentDb.OpenRecordset("SELECT * FROM Table1")
Mais, sur le "openrecordset", j'ai le message d'erreur suivant :
erreur d'exécution '13' : incompatibilité de type
Qqun peut-il m'aider ?
Merci d'avance
Pierre
Bonjour
Vérifies que tu as bien la référence :
Microsoft DAO x.xx Object Library
Et sinon, essais en mettant :
Dim Resultat as DAO.Recordset
PS : Si tu veux toutes les données de Table1, tu peux directement mettre :
Set resultat = CurrentDb.OpenRecordset("Table1")
@+
Jessy Sempere - Access MVP
news@access.fr.vu
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"pierref" <pierref@discussions.microsoft.com> a écrit dans le message news:
8AE56C7F-F428-4F06-9A79-FF39C31578D3@microsoft.com...
Bonjour,
Je souhaite executer une requete dans mon code vba.
J'ai écrit la requete suivante dans l'evenement click d'un bouton:
Dim resultat As Recordset
Set resultat = CurrentDb.OpenRecordset("SELECT * FROM Table1")
Mais, sur le "openrecordset", j'ai le message d'erreur suivant :
Vérifies que tu as bien la référence : Microsoft DAO x.xx Object Library Et sinon, essais en mettant :
Dim Resultat as DAO.Recordset
PS : Si tu veux toutes les données de Table1, tu peux directement mettre : Set resultat = CurrentDb.OpenRecordset("Table1")
@+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------ "pierref" a écrit dans le message news:
Bonjour,
Je souhaite executer une requete dans mon code vba. J'ai écrit la requete suivante dans l'evenement click d'un bouton:
Dim resultat As Recordset
Set resultat = CurrentDb.OpenRecordset("SELECT * FROM Table1")
Mais, sur le "openrecordset", j'ai le message d'erreur suivant :
erreur d'exécution '13' : incompatibilité de type
Qqun peut-il m'aider ?
Merci d'avance
Pierre
pierref
Oui effectivement la librairie n'y etait pas. Ca marche bien maintenant
Merci bcp
Pierre
Bonjour
Vérifies que tu as bien la référence : Microsoft DAO x.xx Object Library Et sinon, essais en mettant :
Dim Resultat as DAO.Recordset
PS : Si tu veux toutes les données de Table1, tu peux directement mettre : Set resultat = CurrentDb.OpenRecordset("Table1")
@+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------ "pierref" a écrit dans le message news:
Bonjour,
Je souhaite executer une requete dans mon code vba. J'ai écrit la requete suivante dans l'evenement click d'un bouton:
Dim resultat As Recordset
Set resultat = CurrentDb.OpenRecordset("SELECT * FROM Table1")
Mais, sur le "openrecordset", j'ai le message d'erreur suivant :
erreur d'exécution '13' : incompatibilité de type
Qqun peut-il m'aider ?
Merci d'avance
Pierre
Oui effectivement la librairie n'y etait pas.
Ca marche bien maintenant
Merci bcp
Pierre
Bonjour
Vérifies que tu as bien la référence :
Microsoft DAO x.xx Object Library
Et sinon, essais en mettant :
Dim Resultat as DAO.Recordset
PS : Si tu veux toutes les données de Table1, tu peux directement mettre :
Set resultat = CurrentDb.OpenRecordset("Table1")
@+
Jessy Sempere - Access MVP
news@access.fr.vu
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"pierref" <pierref@discussions.microsoft.com> a écrit dans le message news:
8AE56C7F-F428-4F06-9A79-FF39C31578D3@microsoft.com...
Bonjour,
Je souhaite executer une requete dans mon code vba.
J'ai écrit la requete suivante dans l'evenement click d'un bouton:
Dim resultat As Recordset
Set resultat = CurrentDb.OpenRecordset("SELECT * FROM Table1")
Mais, sur le "openrecordset", j'ai le message d'erreur suivant :
Oui effectivement la librairie n'y etait pas. Ca marche bien maintenant
Merci bcp
Pierre
Bonjour
Vérifies que tu as bien la référence : Microsoft DAO x.xx Object Library Et sinon, essais en mettant :
Dim Resultat as DAO.Recordset
PS : Si tu veux toutes les données de Table1, tu peux directement mettre : Set resultat = CurrentDb.OpenRecordset("Table1")
@+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------ "pierref" a écrit dans le message news:
Bonjour,
Je souhaite executer une requete dans mon code vba. J'ai écrit la requete suivante dans l'evenement click d'un bouton:
Dim resultat As Recordset
Set resultat = CurrentDb.OpenRecordset("SELECT * FROM Table1")
Mais, sur le "openrecordset", j'ai le message d'erreur suivant :
