...SQLINSERT = "INSERT INTO [TrainingReqs] ( RecSchoolID, SSN, SchoolRecNumber, TargetDate ) " & _
"SELECT (([Personnel].RecNumber*1000) + [RequiredSchoolList].SchoolID), [Personnel}.SSN, " & School & ", (DateAdd(""d"", " & Target & ", Date$()))" & _
"FROM...