Using Excel 2007. In a Workbook_Open sub, I set some named ranges
using
wks2.Names.Add _
Name:=nm, _
RefersToR1C1:=rg

I am trying to clear the contents of these ranges and delete the names
on Workbook_BeforeClose using
For Each nm In Me.Names
wks2.Range(nm).ClearContents
wks2.Range(nm).Delete
Me.Names(nm).Delete
Next nm

It's not working! The data is still there, and the Names Manager
shows the names still there. I've got to finish this one today. Can I
get a bit o' help, please?

Ed