excel - 如何从范围中仅复制excel vba中的值？

Question

我正在尝试使用 vba 宏在 Excel 中将值从表复制到范围，但我不想要表格格式，只想要它的值。我怎样才能做到这一点？

以下是部分代码:

    'Source range
    Set r = Sheets("Sheet1").Range("Table1")

    'Destination range
    Set dest = Range(.Cells(linhaAtual, 1), .Cells(linhaAtual + r.Rows.Count - 1, 5))

    r.Copy Destination:= dest

Answer 1

您可以通过将源范围的值分配给目标范围来完全跳过复制命令:

'Source range
Set r = Sheets("Sheet1").Range("Table1")
'Destination range
Set dest = Range(.Cells(linhaAtual, 1), .Cells(linhaAtual + r.Rows.Count - 1, 5))

dest.Value = r.Value