如何使用VBA将一个范围（Range）复制到另一个工作表中？

在Excel VBA中，你可以使用`Copy`和`PasteSpecial`方法将一个范围（Range）复制到另一个工作表。以下是一个基本的步骤：

Sub CopyToOtherSheet()
    ' 定义源范围
    Dim sourceRange As Range
    Set sourceRange = ThisWorkbook.Worksheets("Sheet1").Range("A1:C10") ' 替换为你需要复制的范围

    ' 定义目标工作表和位置
    Dim targetSheet As Worksheet
    Set targetSheet = ThisWorkbook.Worksheets("Sheet2") ' 或者直接指定"Sheet2"

    ' 复制范围
    sourceRange.Copy
    
    ' 将内容粘贴到目标工作表的特定单元格（这里假设粘贴到B列的前5行）
    targetSheet.Range("B1").Offset(0, 4).Resize(sourceRange.Rows.Count, sourceRange.Columns.Count).PasteSpecial xlPasteValuesAndNumberFormats ' 可能需要调整行数和列数
    ' 粘贴后记得清除原范围的内容
    sourceRange.ClearContents
End Sub

在这个例子中，我们首先设置源范围为Sheet1中的A1至C10单元格，然后复制这个范围并将其粘贴到Sheet2的B列第四行开始的位置。你需要根据实际需求修改相应的单元格引用。