首页 > 解决方案 > VBA:复制值,然后以新名称保存工作表的子集

问题描述

我已经构建了以下 VBA 子例程。

Sub save_worksheets()

With ActiveWorkbook.Sheets(Array("A", "B", "C"))
     .Copy
    ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & Application.PathSeparator & Format(Date, "yyyymmdd") & " - " & "Report.xlsx", FileFormat:=51
End With
End Sub

此代码的重点是将工作表的子集另存为新工作簿。但是,此工作簿包含对单元格的引用,而不是值。我该如何解决这个问题?亲切的问候。

标签: excelvba

解决方案


推荐阅读