Excel VBA复制整个工作表和过去的值

Question

我需要创建一个VBA语句，该语句将复制整个活动工作表，然后将其粘贴为值-看起来很简单，但是我对VBA并不熟悉-它实际上是自动执行左上角的“单击”并复制->粘贴为值。这是我正在尝试的：

Sub CopyPasteSheetAsValues()
'Copy and Paste Summary Sheet as Values
Sheets("Summary Build").Cells.Copy
Sheets("Summary Build").Cells.PasteSpecial Paste:=xlPasteValue
End Sub

Answer 1

您在xlPasteValues中错过了s。另外，最好添加Application.CutCopyMode = False以避免复制区域周围的行进蚂蚁。

Sub CopyPasteSheetAsValues()
    'Copy and Paste Summary Sheet as Values
    Sheets("Summary Build").Cells.Copy
    Sheets("Summary Build").Cells.PasteSpecial Paste:=xlPasteValues
    Application.CutCopyMode = False
End Sub