使用没有公式的宏创建工作簿，但仍链接回宏工作簿？

Question

所以我构建了这个宏工作簿，为我创建了一个格式化的月度报告。

宏如何工作是基于我定义的某些条件构建报表，然后它从工作表“幻灯片”复制数据部分并将其作为值粘贴到下一个工作表“Deliverable”，使用以下代码：< / p>

Application.Goto (ActiveWorkbook.Sheets("Slide").Range("A1"))
Range("C2", Cells(TableRows, 30)).Select
Selection.Copy
ActiveSheet.Next.Select
ActiveSheet.Paste

然后它对“Deliverable”上的所有内容进行格式化和排序，并使用它将其复制到新工作簿：

Sheets("Deliverable").Select
Sheets("Deliverable").Copy

唯一的问题是，当您打开仅包含“可交付”副本的新工作簿时，它仍然会链接回原始宏工作簿，并且您会收到安全警告。我不太关心这一点，因为我知道它来自我，但报告在我的组织之外共享，我宁愿避免为我的客户提出问题和/或麻烦。

新工作簿未启用宏，如上所述，它不包含任何公式，更不用说那些引用原始工作簿的公式。

我该怎么做才能解决这个问题？

Answer 1

好的，这些链接是由复制的工作表带来的工作簿中的命名范围引起的。没有公式，只是命名范围。

我在工作表副本之后添加了它并且它处理了它。

Dim nm As Name 

On Error Resume Next 
For Each nm In ActiveWorkbook.Names 
    nm.Delete 
Next 
On Error Goto 0