jjbunker From beginner to be giver | Bonjour,
je suis nouveau dans la Forum et surtout dans VBA/ACCESS/EXCEL.
En fait je cherche à enregistrer des Infos dans un Tableau Access à l'aide d'un formulaire Excel.
Voici mon code, quand je le compile il Affiche nombre d'arguments insuffisants et l'erreur est marquée sur l'avant derniere ligne...J'ai deja tout verifié et changé maintes fois...sans succes...merci de me montrer quoi faire. f1-f5 sont les noms des textboxes dans lesquelles les données seront inscrites
Code :
- Private Sub savebutton_click()
- Dim strSql As String
- Dim db As Database
- Dim databasepath As String
- databasepath = ActiveWorkbook.Path & "\TEST_Rating.accdb"
- Set db = DBEngine.Workspaces(0).OpenDatabase(databasepath)
- strSql = "INSERT INTO Kunden ('requester', 'Kuerzel_360T', 'KundenID', 'Alpha_CODE_FX_PRO', ' RatingID')" _
- & "VALUES (f1, f2, f3, f4, f5);"
- db.Execute strSql, dbFailOnError
- Unload UserForm2
- End Sub
|
Merci
---------------
From beginner to be giver
|
FORUM HardWare.fr
