Now error is in this line:
'CurrentDb.Execute
Debug.Print _
"Insert Into & MyTable & (C1, C2, C3, C4, C5, C6, C7, C8, C9, C10) " & _
"Select '" & Left(tbl(fld, 0), 8) & "', '" & Right(tbl(fld, 1), 2) & "', F1, F2, F3, F9, F11, F7, F8, F10 From [Text;Database=strPathcsv...