Excel快速删除所有名称

Excel快速删除所有名称内容简介： 在Excel的定义名称对话框中，只能逐个删除名称，这在需要大量删除名称时是非常繁琐的。利用一小段宏代码，可以轻松完成这项工作。 按Alt+F11打开VBA编辑器窗口，单击菜单插入模块来插入一个新模块，默 　在Excel的“定义名称”对话框中，只能逐个删除名称，这在需要大量删除名称时是非常繁琐的。利用一小段宏代码，可以轻松完成这项工作。

　　按<Alt+F11>打开VBA编辑器窗口，单击菜单“插入”→“模块”来插入一个新模块，默认情况下为“模块1”，然后在模块1的代码窗口中输入以下代码：

　　　 Sub DelNames()
　　　　　　　Dim nm As Name
　　　　　　　For Each nm In ThisWorkbook.Names
　　　　　　　　　nm.Delete
　　　　 　Next nm
　　　 End Sub

　　最后，按F5键来运行这段代码，就能一次性删除工作簿中的所有名称。