打开特定的Excel文档,然后转到特定的单元格

时间:2016-01-20 07:28:02

标签: access-vba excel-2010

我正在尝试创建一个简单的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是我表中包含所需信息的列。

2 个答案:

答案 0 :(得分:0)

不知道为什么它不能一直工作(不确定为什么你要激活活跃的细胞 - 它已经活跃了)。

我从未遇到过以下代码的问题(注释掉代码是可选的):

2016_01_20_17_20

答案 1 :(得分:0)

的Darren,

感谢您的建议。我实际上最终用自己的代码来解决这个问题。我发现,在调试模式下,每次尝试后按下停止按钮后脚本都能正常工作。然后我找到了" End"的语法。它会停止所有宏。这最终解决了问题,因为现在我可以在放入" End"之后运行脚本而没有任何问题。在我的剧本结束时。