VBA

Sub DeleteNames()
Dim nme As Name


For Each nme In ActiveWorkbook.Names
nme.Delete
Next nme


End Sub




Here is another way, previously posted by Norman Harker. But beware, it
doesn't work with Excel 2003.


And here's a best kept secret of Excel but it comes with a health warning.


Tools Options Transition

Check Lotus 123 Help
Check Transition Navigation Keys


Now:
/RNR


Removes every single name in the workbook!


Beats doing them one at a time although you can use VBA or various Add-Ins.


But it really ought to come with a health warning after the /RNR command as
it can't be undone! And with many hundreds of names in a workbook

Just close the Names dialog box when it comes up


--

HTH

RP
(remove nothere from the email address if mailing direct)


"Dmitry Kopnichev" wrote in message
...
Hello
How to delete all defined names from a workbook?