将范围从一个工作簿复制到另一个工作簿

Question

前几天我写了一段代码，到目前为止工作正常。但是，由于未知原因，它似乎不再运行。

基本上，我正在将名为Data.xlsm（多个标签页）的工作簿中的范围复制到Masterfile.xlsm（在第一个标签页上）。

代码如下：

Sub CopyingRange()

' Set dimensions
Dim x As Workbook
Dim y As Workbook

' Set Workbook
Set x = Workbooks.Open("C:\Users\...\Data.xlsm")
Set y = Workbooks.Open("C:\Users\...\Masterfile.xlsm")

'Now, transfer values from x to y:
Workbooks("Data").Sheets("Andorra").Range("L123:O123").Copy Range("T3")
Workbooks("Data").Sheets("Angola").Range("L123:O123").Copy Range("T4")
Workbooks("Data").Sheets("Austria").Range("L123:O123").Copy Range("T5")
Workbooks("Data").Sheets("Bahrain").Range("L123:O123").Copy Range("T6")
Workbooks("Data").Sheets("Belgium").Range("L123:O123").Copy Range("T7")
Workbooks("Data").Sheets("Botswana").Range("L123:O123").Copy Range("T8")

End Sub