That was not the best macro name I could have used<g (it was the name I had
on another routine; I just cleared out its code and wrote my new code in its
"housing"). Perhaps

Sub DeleteNames()

might be a better name to use.

--
Rick (MVP - Excel)


"Rick Rothstein" wrote in message
...
You might want to be careful when deleting *all* names since Excel uses
Names for some of the things it does (Print Area, Print Titles for
example); however, this code will delete *all* Names...

Sub deleteRanges()
Dim WBname As Name
For Each WBname In ActiveWorkbook.Names
WBname.Delete
Next
End Sub

--
Rick (MVP - Excel)


"Lynn" wrote in message
...
sorry, its called names.

Insert - names - define

How do i delete all names in a workbook. thanks