Look at:

Sub DeleteNames()
Dim nme As Name
For Each nme In ActiveWorkbook.Names
nme.Delete
Next nme
End Sub

Just be careful about other Names, like printrange, etc.
--
Gary''s Student - gsnu200781


"yshridhar" wrote:

Hi everybody
ctrl+shift+F3 (insert|name|create) will allow the user to create names in
the selected range at once.
1) Then how to delete all the named ranges at once?
2) How to edit the named ranges (data range) at once?
Thanks to you all in advance
Regards
Sreedahr