Appactivate不适用于所有用户

时间:2018-08-06 18:34:20

标签: excel-vba

我有一个简单的Excel程序,它运行一系列宏,其中一个是在Firefox窗口上的AppActivate命令,先发送键,然后再通过Appactivate返回自身。

在我的笔记本电脑上,它可以正常工作。但是当我去另一台笔记本电脑时,我收到一个无效的过程调用错误,好像找不到指定的窗口一样。两台笔记本电脑都运行Windows 10,并且都运行Excel 2016。

我还从头开始编辑应用程序名称/标题,以简化打开工作簿时的窗口名称。

ActiveWindow.Caption = ""

With Application
  .DisplayAlerts = False
  .Caption = "Image Repackage Tool"
End With

对于激活,我只使用

AppActivate "Image Repackage Tool"

我不知为什么它可以在一台笔记本电脑上工作,而不能在另一台笔记本电脑上工作。

****更新****

请确保这不仅仅是错字,也不是标题重命名的问题。我将Excel标题的所有更改都删除了,以便保留原始标题。我还将应用程序激活命令更新为:

AppActivate Title:=ThisWorkbook.Application.Caption

这应该消除该方面的任何错误。

所以现在我的代码读取了

AppActivate "Move Samples - Mozilla Firefox"
Application.Wait Now+TimeSerial(0,0,1)
SendKeys declared_variable
SendKeys "~"
AppActivate Title:=ThisWorkbook.Application.Caption
Application.Wait Now+TimeSerial(0,0,1)

错误始终是运行系统5,并且始终突出显示第二次激活。

0 个答案:

没有答案