使用VBA将数据从一个表复制到另一个表

Question

我需要将2个表从一个Excel工作表复制到另一个。 我不能将它们用作列表对象，因为它们是自动生成的文件。 我认为这可能会有所帮助（打开源文件后，我将activesheet命名为sourcefile，这是包含宏和目标文件的wb）：

Dim isin_data As Range
Dim position_data As Range

Set isin_data = sourcefile.Sheets("ISIN data").Range("A5:CA200")
Set position_data = sourcefile.Sheets("Position data").Range("A5:BD400")

thiswb.Sheets("HLA_ISIN_data").Range("A2:CA197") = isin_data
thiswb.Sheets("HLA_position_data").Range("A2:BD397") = position_data

什么也没发生，你能帮我为什么吗？这可行，但不优雅，而且效率不高：

sourcefile.Sheets("ISIN data").Range("A5:CA200").Copy
thiswb.Sheets("HLA_ISIN_data").Activate
Range("A2:CA197").Select
Selection.PasteSpecial Paste:=xlPasteValues

sourcefile.Sheets("Position data").Range("A5:BD400").Copy
thiswb.Sheets("HLA_position_data").Activate
Range("A2:BD397").Select
Selection.PasteSpecial Paste:=xlPasteValues

谢谢！