我正在尝试创建一个简单的VBA脚本,它将打开一个特定的Excel文档,然后转到特定的单元格。当前代码将每隔一段时间运行一次。我搜索并发现了几个主题和线程,但没有解决问题。
以下是我正在使用的代码。
Dim oApp As Object
Dim oSheet As Object
Set oApp = CreateObject("Excel.Application")
oApp.Visible = True
oApp.Workbooks.Open "path to excel documents" & [CopperMap]
Set oSheet = oApp.Worksheets([SpreadSheet])
oSheet.Activate
ActiveCell.Activate
Range([CellColumn]).Activate
CopperMap,SpreadSheet和CellColumn是我表中包含所需信息的列。
答案 0 :(得分:0)
不知道为什么它不能一直工作(不确定为什么你要激活活跃的细胞 - 它已经活跃了)。
我从未遇到过以下代码的问题(注释掉代码是可选的):
2016_01_20_17_20
答案 1 :(得分:0)
的Darren,
感谢您的建议。我实际上最终用自己的代码来解决这个问题。我发现,在调试模式下,每次尝试后按下停止按钮后脚本都能正常工作。然后我找到了" End"的语法。它会停止所有宏。这最终解决了问题,因为现在我可以在放入" End"之后运行脚本而没有任何问题。在我的剧本结束时。