由于Trim造成的编译错误:找不到工程或库

[hz03zhuhaowen]

有一个程序，会报错：“编译错误:找不到工程或库”
测试是由于程序中的
If Trim(Text2.Text) <> "" Then

中的"Trim"函数造成的，注释掉"Trim"，就不会报这个错误了，请问是怎么回事？

[chuifengde]

VBA.Trim

[帝企鹅已被占用]

可能是一个在用的引用被删了。

[SYSSZ]

我也遇到过这种情况，重新建立一个工程，将代码拷过去就好了。

[hz03zhuhaowen]

Public xlApp            As Excel.Application
Public xlbook           As Excel.Workbook
Public xlsheet          As Excel.Worksheet

用了VBA.Trim，
没有报这个错了，
但是Set xlsheet = xlbook.Worksheets("材料单价数据")
报错为"对象变量或With块变量未设置"，请问怎么回事？

[hz03zhuhaowen]

问题解决了，
相应的加上VBA就好了。