VBA 错误地复制数据

问：

我正在尝试使用VBA从一张工作表复制数据并将其作为值粘贴到另一张工作表中。代码应将新数据粘贴到目标工作表中任何现有数据下方 2 行。

我的代码当前将数据放在正确的位置。但是，它不会从源工作表复制数据。相反，它复制了目标工作表名称，我不确定为什么。

Sub CopyAndPasteData()
    Dim wsSource As Worksheet
    Dim wsDestination As Worksheet
    Dim lastRow As Long
    
    ' Set the source and destination worksheets
    Set wsSource = Worksheets("Sheet1")
    Set wsDestination = Worksheets("Sheet2")
    
    ' Find the last row with data in column A of the destination sheet
    lastRow = wsDestination.Cells(wsDestination.Rows.Count, "A").End(xlUp).Row
    
    ' Copy values from rows A106:A110 of the source sheet
        wsDestination.Cells(lastRow + 2, 1).Resize(5, 1).Value = wsSource.Range("A106:A110").Value

End Sub