如何将工作簿中的命名单元格删除?

　　【问题】

　　如何将工作簿中的命名单元格删除?

　　【解答】

　　代码：

　　Dim Item As Name

　　For Each Item In ActiveWorkbook.Names

　　Item.Delete

　　Next Item