A family of Microsoft relational database management systems designed for ease of use.
SQL = "INSERT INTO Job_Sheet_updated (Lot,Status,STARTDATE,CLOSINGDATE,Type,ADDRESS) " & _
"SELECT (Lot,Status,STARTDATE,CLOSINGDATE,Type,ADDRESS) FROM Job_Sheet " & _
"WHERE NOT EXISTS " & _
"(SELECT * " & _
"FROM Job_Sheet_updated " & _
"WHERE Job_Sheet_updated.Lot = Job_Sheet.Lot);"
debug.print sql
DoCmd.RunSQL SQL
This way,you can copy from immediate window and paste to new query sql view which will show error details.
If possible share some datas which can paste to Access and your expected reault.