Clearcontents of all named ranges on a sheet

The title says it all. How can I clear the contents of a all named ranges in a sheet?
Hmm... I guess one way of doing it would be to define another range consisting of all the named ranges but I really don't need more named ranges in this application.

hi Jacc. not my code, but i simply edited it to suit your needs:

Please Login or Register  to view this content.

source:
http://www.excelforum.com/excel-prog...-contents.html

Do you mean like this

Please Login or Register  to view this content.

Sorr I didn't see benishiryo post is kind of same

Thanks for the response, guys!
It's not quite what I need. I need it to clear contents of all names referring to a certain sheet, not all names in the entire workbook. I am pretty sure all the names on that sheet are local.

like this?

Please Login or Register  to view this content.

change the name in red accordingly

Yes, that's it, thanks!

Turns out it didn't work anyway because there are a quite a few merged cells.
Yes, I know that you are supposed to stay away from merged cells and I think I can get rid of most of them.
Well, that's a task for tomorrow. Thanks for the input!