MS Access和Excel实例化，xlup未定义

所以我使用迟绑定，即set objxl = createobject("Excel.Application")types的东西，从早期绑定set objxl = new excel.application它的位置set objxl = new excel.application或什么，但现在件如.end(xlUp).row抛出错误，因为xlUp没有定义。

Answer 1

这是因为xlUp是在Excel中定义的，而不是在Access中定义的。 你可以用相应的数值replacexlUp（不是一个好主意），或者你可以在Access中定义常量。

 Private Const xlUp as long = -4162 

这是一个更多的工作，但允许您使用xlUp，使您的代码更具可读性，并且可能更容易维护。

Answer 2

如果将参考设置为Excel（VBA屏幕，工具，参考，selectMicrosoft Excel（Ver＃）对象库？那么可以像使用Excel一样进行编码，只要小心 – 一旦Access模块​​运行，它可能会使EXCEL.EXE运行。