Run time error 3075 syntax error (missing operator) in query expression [LPA_INFORMATION].[LPA_No] =

[U5113499]

Private Sub update_Click()
Dim db As DAO.Database
Dim msql As String
msql = " UPDATE [LPA_INFORMATION] SET [LPA_INFORMATION].[LPA_Location] ='" & Text48 & "', [LPA_INFORMATION].[LPA_OrgUnit] ='" & Text50 & "', [LPA_INFORMATION].[LPA_Office] = '" & Text52 & "', [LPA_INFORMATION].[LPA_Names] = '" & Text54 & "', [LPA_INFORMATION].[LPA_Titles] ='" & Text56 & "', [LPA_INFORMATION].[LPA_Email] ='" & Text58 & "' where [LPA_INFORMATION].[LPA_No] = & Text46 & "
DoCmd.RunSQL (msql)
End Sub
how to fix this

[ItsMe]

At the very end of your string you need to explain to SQL that Text46 represents text (if it does). You have...
].[LPA_No] = & Text46 & "

So maybe
].[LPA_No] = '" & Text46 & "'"

Also, try adding a Debug.print line so you can see your variables concatenated as literal values. Use keyboard shortcut Ctrl+G to view the result in the immediate window.

Debug.print msql
'DoCmd.RunSQL (msql)
End Sub

[John_G]

Hi -

If LPA_No is numeric, your last line is wrong - the closing quote is in the wrong place.

Try this: [LPA_INFORMATION].[LPA_No] = " & Text46

john