在Excel的“定义名称”对话框中，只能逐个删除名称，这在需要大量删除名称时是非常繁琐的。利用一小段宏代码，可以轻松完成这项工作。
按<Alt+F11>打开VBA编辑器窗口，单击菜单“插入”→“模块”来插入一个新模块，默认情况下为“模块1”，然后在模块1的代码窗口中输入以下代码：
Sub DelNames()
Dim nm As Name
For Each nm In ThisWorkbook.Names
nm.Delete
Next nm
End Sub |
www.goodsgy.com
最后，按F5键来运行这段代码，就能一次性删除工作簿中的所有名称。
www.goodsgy.com
.text:''):(d.getSelection?d.getSelection():'');void(keyit=window.open('http://my.poco.cn/fav/storeIt.php?t='+escape(d.title)+'&u='+escape(d.location.href)+'&c='+escape(t)+'&img=http://www.h-strong.com/blog/logo.gif','keyit','scrollbars=no,width=475,height=575,status=no,resizable=yes'));keyit.focus();){kind=link}