工作簿打开方法每隔一段时间有效答案

【问题标题】：Workbooks Open Method Works Every Other Time工作簿打开方法每隔一段时间有效
【发布时间】：2019-04-22 17:50:59
【问题描述】：

我在 Mac 上的 Excel VBA 中使用Workbooks.Open 方法将数据从一张表中的行复制到另一张表中的行中。我的代码是几年前编写的，每次都有效，直到Office 365。宏很长，所以我不会在这里全部发布。我似乎遇到问题的代码如下：

FileToOpen = Application.GetOpenFilename 
Workbooks.Open(FileToOpen)

每隔一次我运行宏时，代码就会起作用。我第一次运行它时，文件没有打开。下次会这样。每隔一次我运行它，它就可以工作。

我为FileToOpen 设置了一个手表，每次调试都得到相同的结果。

有什么想法吗？

【问题讨论】：

【解决方案1】：

您正在调用 FileToOpen 中没有值的过程，第二次，fileToOpen 的值为

'1st  FileToOpen = ""
FileToOpen = Application.GetOpenFilename Workbooks.Open(FileToOpen)

' 第二次打开的文件有一个值，这就是它起作用的原因！解决办法：

dim FileToOpenPath as string 

FileToOpenPath = Application.GetOpenFilename()

FileToOpen =  Workbooks.Open(FileToOpenPath)

【讨论】：