Excel：将多个行和列从一个工作表复制并粘贴到另一个工作表

Question

我想将多个行从一个工作表复制到另一个工作表，我的数据从一个工作表开始在A2行，结束于A108850，它从A2列开始，在I2列结束，我如何将所有这些数据复制到另一个工作表中，行以A4开头，列以A4开头，以I4结尾。

我怎么可能通过某个宏呢？

谢谢。

Answer 1

尝试这个

Worksheets("Sheet1").Range("A2:I108850").Copy Worksheets("Sheet2").Range("A4")

相应地更改范围引用和工作表的名称。

Answer 2

复制粘贴是一项“昂贵”的操作，范围越大，操作越昂贵

如果您仅对值感兴趣，则可以尝试以下操作：

    Worksheets("DestinationSheetName").Range("A2:I108850").Value = Worksheets("SourceSheetName").Range("A2:I108850").Value

在OP评论后编辑

如果您最后一个注释中的代码具有仅粘贴值的相同目的，则将第二条语句更改为以下内容：

    With Worksheets("Sheet1").Range("A2:I108850") '<--| reference the "source" range you want to paste values from
         .Range("A4").Resize(.Rows.Count, .Columns.Count).Value = .Value '<--| resize "destination" range accordingly to "source" one and paste values into it
    End With

当然，您必须检查工作表名称是否对当前活动的工作簿有效