请教这段代码问题出现在哪里？

lsb79967530

在将excel的数据批量录入数据库的时候，将这个里代码加到我的数据库里，出现以下问题，  请教这段代码问题出现在哪里？

1025        Set re2 = CurrentDb.OpenRecordset("select * from 人员基本资料 " & _
                     "where PersonalID like '" & re(X) & "'")

原表“人员基本资料”改为“备件汇总”


已经解决