Excel 2010 VBA - 将行粘贴到表的末尾会出现“类型不匹配”错误

Question

我正在从一个计算表中复制数据，并将其附加到静态表进行存档。这些表的列数相同。

我运行下面的宏，我收到“类型不匹配”错误。

Sub CopyTable(t As String, destSheet As String)
    Dim srcRng, destRng As Range

    Set srcRng = Range(t)
    srcRng.Copy
    Set destRng = Sheets(destSheet).Cells(Rows.Count, "B").End(xlUp).Offset(1, -1)

    destRng.PasteSpecial xlPasteValues

    Set srcRng = None
    Set destRng = None

End Sub

谁能告诉我为什么以及如何解决它？

Answer 1

您需要将无替换为 Nothing 。