将 Excel 工作表、宏和图表从一个工作簿复制到另一个工作簿，并将链接移动到新工作簿

Question

我有一个具有许多功能的 Excel 工作簿：

• 一个面向用户的主要工作表
• 一个基于面向用户的工作表数据的摘要工作
• 表 一些基于面向用户的工作表数据的图表（例如，带有它们的单独选项卡，而不是工作表中的对象 - 我不确定它们是否有特殊名称或特殊属性）
• 一系列“背景”工作表，用于计算面向用户的工作表的值
• 允许用户使用的宏按他们希望的任何列对用户工作表进行排序，该列在面向用户的工作表的 Worksheet_SelectionChange 事件中引用

但是，为了分发，我想剔除工作表以简化工作表（以及文件大小 - 整个数据查询都包含在一个工作表中）的床单）。 我仍然需要计算面向用户的工作表的值，但每个数据集只执行一次，因此可以很高兴地将其复制为格式化值。

然而，问题在于将依赖的工作表、图形和宏传输到新工作簿，这样它们就不会引用旧工作簿，而是引用工作表的新版本。 理想情况下，我想使用 VBA 或其他东西来完成此操作，但到目前为止我的 Google 搜索似乎没有发现太多相关性。

有谁知道如何做到这一点？

Answer 1

我不确定我完全理解你的问题，但我认为你想要做的是创建一个新版本的工作簿，其中的工作表更少？

要在 VBA 中执行此操作，此代码片段是一个很好的起点：

Sub Macro1()
    ActiveWorkbook.SaveAs Filename:= _
        [your path here]\Book2.xls", FileFormat:=xlNormal, _

    Sheets("Sheet2").Select
    ActiveWindow.SelectedSheets.Delete
End Sub

创建整个工作簿的副本，然后删除不需要的内容，以确保链接不会引用旧工作簿。

创建新工作簿且链接完好无损后，就可以很容易地删除所有不需要的内容（计算等）。