Dim sql2023PS As String
sql2023PS = "insert into tbl2023 (学号,生源地,就业地,就业类型) select 学号,生源所在地,就业单位所在地,,毕业去向 from tblPriSch"
DoCmd.RunSQL sql2023PS   '此处报错

from前面有两个连续的逗号，会导致语法错误

另外，查询结果存入表，一般有两种形式，除了楼主的 INSERT INTO tab SELECT ... 外，还有一种是 SELECT ... INTO tab FROM ...，试试看，总一个一款能通过，可以先在ACCESS的查询里面测试

[此贴子已经被作者于2023-5-18 15:57编辑过]

谢谢，用后一种语句解决了😁