[MS_AccessPros] Add Dynamic Column name

 

Hello,

I am trying to add the column name dynamically using VBA,
This is the code snippet that I am trying to use,

Private Sub Detail_Click()
Dim Q1 As Integer
Dim colName As String

Q1 = Me![SubformEventDetails].Form![Quantity]
colName = Me![SubformEventDetails].Form![Item_Name]
DoCmd.RunSQL " INSERT INTO Tbl_InvDetails ('" & colName & "') values ( " & Q1 & " ) "

End Sub

I get the following error
The INSERT INTO statement contains the following unknown field name: "6ft_Table". Make sure you typed the name correctly, and try the operation again.

However, DoCmd.RunSQL " INSERT INTO Tbl_InvDetails (6ft_Table) values ( " & Q1 & " ) " works perfectly fine.

Thanks,

Jim Wagner

__._,_.___

Reply to sender | Reply to group | Reply via web post | Start a New Topic

Messages in this topic (1)

Recent Activity:

• New Members 5
• New Files 2

Visit Your Group

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use

.

__,_._,___