首页 > 解决方案 > 无法将范围复制到 VBA office 2010 中的其他工作簿

问题描述

我有一个奇怪的问题,我无法按照子程序运行:

Sub Copy_Workbook()
   Workbooks("book1").Sheets("Sheet1").Range("a1").Copy _ Workbooks("book2").Sheets(2).Range("a2")
End Sub

我有两个excelxlsm,都打开并且在同一个实例中打开。

我确实收到了问题Out of range

如果有人知道为什么它不能工作,请您指教,谢谢。

标签: excelcopyrange

解决方案


以下子将起作用。

Sub Copy_Workbook()
   Workbooks("book1").Sheets("Sheet1").Range("a1").Copy Workbooks("book2").Sheets(2).Range("a2")
End Sub

您必须确认:

两个工作簿已打开,Book2至少有 2(两)张工作表。检查工作表名称的所有拼写是否正确。


推荐阅读