我的计算机上有两个计划任务.它们都打开excel文件并运行宏,并且与它们的功能非常相似.它们都在我的电脑上工作.但是我将计划的任务移到同事计算机上.一个人工作,另一个人没有.
没有工作的那个开了excel但是有一个错误说:
"对可视化基础项目的编程访问不受信任".
就像我说两个excel文件非常相似.没有工作的那个确实引用了另外两个项目,而另一个没有.他们是,
Microsoft Visual Basic for Applications Extensibility 5.3
Microsoft Windows Common Controls-2.6.0 (SP6)
Run Code Online (Sandbox Code Playgroud)
我之前从未遇到过这个错误.
我正在使用此功能(它返回文本DK001位于ID范围内的行)
Found = Application.Evaluate("=IF(ID=""DK001"",ROW(ID),""x"")")
Run Code Online (Sandbox Code Playgroud)
我想将搜索条件(例如DK001)作为字符串提供,例如
Found = Application.Evaluate("=IF(ID=SearchString,ROW(ID),""x"")")
Run Code Online (Sandbox Code Playgroud)
我无法创建一个被接受为搜索条件的字符串。我需要您的帮助!我究竟做错了什么?
这个评估功能困扰着我....
如果我现在想向函数发送一个值(而不是字符串)怎么办?
Found = Application.Evaluate("=IF(ID=1,ROW(ID),""x"")")
Run Code Online (Sandbox Code Playgroud)
以上作品!
但是如果我希望这是一个像
Found = Application.Evaluate("=IF(ID=MyValue,ROW(ID),""x"")")
Run Code Online (Sandbox Code Playgroud)
然后怎样呢?
在Access中,使用VBA,我想使用Application.Run并捕获任何错误.不幸的是,Application.Run似乎劫持了错误捕获.有没有办法来解决这个问题?
On Error Resume Next
Application.Run ...
Run Code Online (Sandbox Code Playgroud)
即使我指定On Error Resume Next或On Error GoTo ErrCatch,我也永远不会错过Application.Run.我的错误捕获设置被忽略.