Discussion :

[tmihob]

Bonjour,

J'ai beau cherché pendant des heures sans succès sur le fait de vouloir modifier un ou plusieurs enregistrements dans une base access avec VBA excel. D'où je viens vers vous.
le programme bug sur la ligne d’exécution de la requette, ci-après un bout de code et l'erreur correspondant.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Dim rep As String, fich As String
Dim cnn As ADODB.Connection
Dim rs As ADODB.Recordset
    rep = ThisWorkbook.Path & "\global\"
    fich = "base.mdb"
    Set cnn = New ADODB.Connection
cnn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & rep & fich
Sql = "UPDATE stock SET Note='New valeur de la note'" 'dans la table stock, on doit pouvoir modifier les champs où il y a des notes
cnn.Execute Sql 'ici la ligne qui renvoi le message

[Microsoft][Pilote ODBC Microsoft access] Erreur de syntaxe dans l'instruction UPDATE.

Quelqu'un pourrait-il m'aider à ce propos ?

[tmihob]

Rebonjour,
Désolé pour le dérangement. J'ai trouvé ce qui n'allait pas. c'est fou.
Au cas ou quelqu'un rencontre le même problème, voici la bonne syntaxe

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sql = "UPDATE stock SET [Note]='New valeur de la note'" ' entourer le champs par [ ].

Attention cette requette car elle va modifier toutes les notes des enregistrement si vous n'ajoutez pas une condition "WHERE..."