I changed all the names to show as followd BOMNo, VersionCode,
strSql = "INSERT INTO tblMaster2 (*) '" & _
"SELECT " & lngID & " As NewID, Type, No, VariantCode, Description, Quantity, Scrap% " & _
"FROM tblMaster2 WHERE BOMNo= '" & Me.BOM_No & "' AND VersionCode= '" & Me.Version_Code & "';"...