我正在做的是从不同的工作簿复制工作表到我当前的工作簿。我基本上做以下几点:Excel复制工作表从外部工作簿
Delete the current Worksheet in the current Workbook
Open the external Workbook and Copy the Worksheet required
这一切都按预期工作但在其他工作表的所有引用都将丢失,用#REF取代。
是否有解决方法(除了查找和替换黑客)可以做到避免这种情况。
问候,
劳埃德
我正在做的是从不同的工作簿复制工作表到我当前的工作簿。我基本上做以下几点:Excel复制工作表从外部工作簿
Delete the current Worksheet in the current Workbook
Open the external Workbook and Copy the Worksheet required
这一切都按预期工作但在其他工作表的所有引用都将丢失,用#REF取代。
是否有解决方法(除了查找和替换黑客)可以做到避免这种情况。
问候,
劳埃德
你可以尝试使用清除,而是复制粘贴:
- 清除当前工作表
的内容 - 复制外部工作表
- 粘贴到当前工作表
为什么不复制工作表中包含的值而不是整个工作表对象?
v = Workbooks("Book1").Worksheets("Sheet2").Range("A1:IV65536")
Workbooks("Book3").Worksheets("Sheet1").Range("A1:IV65536") = v
其中v
是变体。或者,
Workbooks("Book3").Worksheets("Sheet1").Range("A1:IV65536") = _
Workbooks("Book1").Worksheets("Sheet2").Range("A1:IV65536")
这需要几秒钟,但会更快,如果你减少至你真正需要("A1:IV65536"
大概是夸张...)
当然,这不会做如果您正在复制工作表中的公式,并且您在目标工作表中需要这些公式。从你的问题中你不清楚你想要完成什么。
任何我遇到的答案是有帮助的将投票。 – ThePower 2011-04-15 13:20:07