如何将数据从一个已经打开的Excel文件（Workbook1，Sheet1，单元格A11）复制到另一个已经打开的Excel文件（workbook2，sheet1，A11）

Question

我有2个不同的打开的excel文件，我想使用第一个excel文件中的宏将数据从第一个文件复制到secound文件？

我使用此代码，但是当在两个不同的excel文件中打开两个工作簿并在1个excel文件中打开时，它确实起作用，它显示“运行时错误9”或类似的内容

Sub Macro2()

Macro2 Macro

Range("D5:L5").Select
Selection.Copy
Windows("New_SET_Data.xlsx").Activate
Range("B7").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
    False, Transpose:=True
Windows("Original_SET_Data.xls").Activate

End Sub

如何更改代码，以便我将数据从excelfile“ A”中的workbook1转换为excel文件“ B”中的workbook2

Answer 1

我猜你可以使用GetInfoFromClosedFile（），但是我从未测试过。

我记得用过：

dim txt = "'C:\[test.xls]Page 1'!R1C1"

这在理论上应该起作用...