Named Ranges - Remove when saving ?

[Sparkle99]

Hi,
I have an Excel 2007 XLSM workbook that processes a worksheet and then copies it and saves it as a new file.
All fine.

The main workbook makes use of a lot of named ranges.

When the new file is then sent to a different PC and opened and saved, there's a warning about formulas are linked to ranges in other workbooks - the name manager in the new workbook shows the named ranges from the originating workbook.

So, when I save the new XLSX file, can I remove the named ranges so that this warning doesn't occur ? (as the ranges are not required in the new workbook)

 

[njimack]

The below code will remove all names from the active workbook...

Sub Del_Names()
Dim nm As Name
Dim i As Long, Count As Long
i = 1
Count = ActiveWorkbook.Names.Count
On Error Resume Next
For Each nm In ActiveWorkbook.Names
    nm.Delete
    Application.StatusBar = "Deleting " & i & " of " & Count & " Names..."
    i = i + 1
Next nm
Application.StatusBar = False
End Sub

 

[Sparkle99]

Thanks, this works a treat.
I've slimmed it down to...

Dim NameRange As Name
For Each NameRange In ActiveWorkbook.Names
NameRange.Delete
Next NameRange