Question

如何快速删除excel工作簿中所有已定义的名称

Answer 1

如果需要一次删除Excel工作簿中所有已定义的名称，可以使用下面的方法：
一、使用VBA代码：
在Excel 2003中的“定义名称”对话框中，可以查看并逐个删除名称，但如果定义的名称非常多就会很繁琐。用下面的VBA代码可以一次删除工作簿中的所有定义名称。方法是：
1.按快捷键Alt+F11，打开VBA编辑器。在右侧的代码窗口中输入：
Sub DeleteAllNames()
Dim nm As Name
For Each nm In ThisWorkbook.Names
nm.Delete
Next nm
End Sub
2.将光标定位到这段代码中，单击工具栏中的“运行子过程/用户窗体”按钮，或直接按F5键运行代码。该工作簿中的所有定义名称将被删除。
还可以在VBA编辑器中，按Ctrl+G打开“立即”窗口，输入下列代码然后按回车键：
executeexcel4macro "sum(delete.name(names()))"
也可以一次删除工作簿中的所有名称。
二、用Excel 2007名称管理器
在Excel 2007中的名称管理器中，可以一次删除所有名称。方法是：
1.在功能区中单击“开始”选项卡，在“定义的名称”组中，单击“名称管理器”按钮，弹出“名称管理器”对话框。
2.在对话框中选择第一个名称，然后按住Shift键选择最后一个名称，这将选择所有的名称。

3.单击“删除”按钮，然后关闭对话框