How to Delete ALL Defined Names in a WorkBook Dynamically created from a Single Sheet

How to Delete ALL Defined Names in a WorkBook Dynamically created from a Single Sheet?

I am creating some Files or WorkBooks Dynamically everything is fine however the purpose of creating this is to just have the Data BacK up with only Values and Formatting and No Formulas...

But after checking the New WorKBook it has all the Defined Names from the Parent MasterSheet..

IS is t possible to delete ALL the Defines Names when it is being created ?

While GOOGLING on this issue I found some code which I tried in vain..
http://www.ozgrid.com/forum/showthre...t=20268&page=1

Richie's Code

Sub RemoveNames()
Dim nm As Name
Dim NewWkBkName As String ' My New Line
NewWkBkName = Sheets("PassBook").Range("U5").Value ' My New Line

For Each nm In NewWkBkName.Names 'ThisWorkbook.Names
nm.Delete
Next nm
End Sub

Just to explain where Im going wrong Im enclosing it in Quotes..please excuse..!

I am unable to attach a WorkBook as the file contains all confidential information so please pardon me for the same.

Warm Regards
e4excel