我正在尝试制作一个宏，它将数据从一个 excel 工作簿复制到另一个 excel 工作簿。当我的宏尝试读取包含数据的工作簿时，我收到运行时错误“9”：下标超出范围。这是我单击调试时突出显示的代码部分：
Workbooks("DWH109.xls").Activate
excel 工作簿是从我的工作用来运行报告的另一个程序打开的。excel 工作簿也以兼容模式打开。我已使用测试代码读取所有打开的工作簿，以查看是否可以实际找到工作簿以及我是否拥有正确的工作簿名称。测试代码能够读取我想要从中提取数据的打开工作簿，但我的代码就像工作簿不存在一样。有什么解决办法吗？谢谢
我使用的测试代码是这样的：
Sub Check_if_workbook_is_open()
'declare a variable
Dim wb As Workbook
For Each wb In Workbooks
If wb.Name = "DWH109.xls" Then
'this message will appear if one of the open workbooks is DWH109.xls
MsgBox "File is Open"
End If
Next
End Sub