excel - 错误 6 - 溢出问题

Question

下面的代码给了我一个错误代码 6 溢出。当我在错误上单击确定时，文件将打开。我使用相同的代码在此宏中打开其他工作簿，它们很好。我将文件移动到我的 desto 并且它有效。B但是，当尝试从网络位置加载它时，它会失败。我确保在重用它们之前清除我的变量。

Dim xlWorkbook2 As Excel.Workbook
Dim FILEPATH As String

FILEPATH = "C:\\Daily Remit History Data\dailycashtran.xlsx"
Set xlWorkbook2 = Workbooks.Open(FILEPATH)

Answer 1

问题是下一行代码，如果没有找到我编码的工作表名称，我正在计算单元格的数量。

count = Worksheets("Sheet 1").Cells(Rows.count, "A").End(xlUp).Row

当工作表打开时，我正在打开另一个 EXCEL 实例。一旦我看到我的方式错误并纠正了我打开另一个工作簿的方式（如果解决了我的问题）。

谢谢