如何删除excel中隐藏的名称

一些Excel宏和加载宏可以坐成隐含的名称，这些名称存在于某个工作簿中，但是并不出现在“定义名称”对话框中。例如， Solver加载宏生成了许多隐含的名称。通常，可以忽略掉这些隐含的名称。
然而，有时候这些隐含的名称会引起问题。假如将一个工作表复制到另一个工作簿中，隐含的名称也同样被复制，并且它们可能产生很难跟踪的链接。
可以使用下列一段VBA程序删除工作簿中的所有隐含的名称：
Sub DeleteHiddenNames()
Dim n As Name
Dim Count As Integer
For Each n in ActiveWorkbook.Names
If Not n.Visible Then
n.Delete
Count=Count+1
End If
Next n
MsgBox Count & "hidden names were deleted."
End Sub