excel - 如何将工作表作为值复制到另一个工作表

Question

我目前有一个宏，可以复制我的名为“输入表单”的工作表并将其复制到新的工作簿中。

我想将此代码更改为仅将工作表复制为值。

Dim filename As String
Dim path As String
filename = "Invoice" & Range("D13") & "_Store" & Range("D17") & "_" & Format(Range("D12"), "yyyy-mm-dd")
path = Worksheets("Filepaths").Range("C4")
Sheets("Input Form").Select
Sheets("Input Form").Copy
ActiveWorkbook.SaveAs filename:=path & filename, FileFormat:=xlExcel12

我看过类似的答案，但他们的原始代码与我的不同，答案不适用

提前致谢

更新：尝试 BigBens 建议

Dim filename As String
Dim path As String
filename = "Invoice" & Range("D13") & "_Store" & Range("D17") & "_" & Format(Range("D12"), "yyyy-mm-dd")
path = Worksheets("Filepaths").Range("C4")
Sheets("Input Form").Select
Sheets("Input Form").Copy
With ActiveWorkbook.Worksheets(1).UsedRange
.Value = .Value
End With
ActiveWorkbook.SaveAs filename:=path & filename, FileFormat:=xlExcel12

标签： excelvba