Hi Sean,
Here is what I have.
Private Sub Test_Click()
Dim strSQL As Integer
strSQL = "Insert Into tblScanned(ApplicantID) Values(& Me!Test & )"
CurrentDb.Execute strSQL, dbFailOnError
Me!Test = vbNullString
End Sub
When I remove the quotes, the line
strSQL = "Insert Into...