将单元格值（非公式）从一张纸复制并粘贴到另一张纸

Question

我正在尝试将大量单元格的值从一张纸复制并粘贴到另一张纸。我尝试过

Sheets("Sheet1").Range("A1:Z150").Copy Destination:=Sheets("Backup").Range("A1")

它改为复制公式。

添加.Value会导致错误Object required。

我也尝试过。

Sheets("Sheet1").Range("A1:Z150").Value = Sheets("Backup").Range("A1").Value

如何复制单元格值？

Answer 1

您可以尝试以下方法：

Sheets("Sheet1").Range("A1:Z150").Copy
Sheets("Backup").Range("A1").PasteSpecial xlValues

Answer 2

如果您要使用value，则两个范围的大小应相同：

Sheets("Sheet1").Range("A1:Z150").Value = Sheets("Backup").Range("A1:Z150").Value

Answer 3

您可以使用Range对象的Address属性来确保在不同范围内引用相同的地址：

With Sheets("Sheet1").Range("A1:Z150")
    Sheets("Backup").Range(.Address).Value = .Value
End With