excel - 复制值，没有公式。优秀的VBA

Question

我正在编写代码以将工作表从一个工作簿（W1）复制到另一个工作簿（W2）。我知道该怎么做，但问题是 W2 中的复制表仍然有 W1 中的公式和引用，我不希望我只想要这些值。

这是我复制工作表的代码：

    Set W1 = Workbooks("REPORT1.xlsx")
    Set W2 = Workbooks("REPORT2.xlsx")
    W1.Sheets("TEST").Copy After:=W2.Sheets(wb.Sheets.Count)

有什么想法吗。谢谢

Answer 1

Set W1 = Workbooks("REPORT1.xlsx")
Set W2 = Workbooks("REPORT2.xlsx")
W1.Sheets("TEST").Copy After:=W2.Sheets(wb.Sheets.Count)
ActiveSheet.UsedRange.Value = ActiveSheet.UsedRange.Value