“Excel VBA Copiar valores de pasta de hoja entera” Código de respuesta

Excel VBA Copiar valores de pasta de hoja entera

Sub CopySheetPasteAsValues()
    Sheets("Sheet1").Cells.Copy
    Sheets("Sheet1").Cells.PasteSpecial Paste:=xlPasteValues
    Application.CutCopyMode = False
End Sub