技巧教程:快速删除所有名称
在Excel的“定义名称”对话框中,只能逐个删除名称,这在需要大量删除名称时是非常繁琐的。利用一小段宏代码,可以轻松完成这项工作。
按<Alt+F11>打开编辑器窗口,单击菜单“插入”→“模块”来插入一个新模块,默认情况下为“模块1”,然后在模块1的代码窗口中输入以下代码:
Sub DelNames()
Dim nm As Name
Each nm In ThisWorkbook.Names
nm.Delete
Next nm
End Sub
最后,按F5键来运行这段代码,就能一次性删除工作簿中的所有名称。