Execution d'une requete SQL access depuis macro excel

Fermé
zildjian71 - 30 nov. 2012 à 21:43
f894009 Messages postés 17241 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 février 2025 - 1 déc. 2012 à 08:30
Bonjour,

Comme marque dans le tire, je cherche a executer une requette access depuis excel à l'aide d'une macro.

Sub MacroAccess()

Dim acApp As New Access.Application

' Démarrer Access
Set acApp = New Access.Application
   
    ' Ouvrir la base de données concernée
    acApp.OpenCurrentDatabase ("C:\Users\Max\Desktop\AST\Base de données5.accdb")
   
    ' Exécuter l'instruction SQL
    acApp.DoCmd.RunSQL ("Insert into Auto VALUES ('', '" & nom & "','" & prenom & "', '' ,'" & acces & "')")
   
    ' Quitter Access
    acApp.Quit
    Set acApp = Nothing
    MsgBox "Ajout terminée !", vbInformation
End Sub



Quand j'execute ma macro, une fenetre s'ouvre et affiche :

erreur d'execution 2501 : Erreur definie par l'application ou par l'objet.

Je pense que c'est une histoire de parametre, mais lequel ?

Merci d'avance
A voir également:

1 réponse

f894009 Messages postés 17241 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 février 2025 1 713
Modifié par f894009 le 1/12/2012 à 08:41
Bonjour,

Je n'ai pas l'erreur 2501, mais la requete SQL n'est pas correcte

Principe:
acApp.DoCmd.RunSQL ("INSERT INTO NomTable(NomChamp1,NomChamp2,......) Values ('" & ValChamp1 & "','" & ValChamp2 & ........"')")

Normalement, vous ne pouvez pas creer d'enregistrements avec des valeurs de champs vide.

Bonne suite
1