Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Delete All Names - Even Invalid "#REF" Names
FYI: The following code will delete all names in a workbook, including
those with a "#REF" error: Sub Delete_Names() Dim NameX As Name On Error GoTo Nxt For Each NameX In Names ActiveWorkbook.Names(NameX.Name).Delete Nxt: Next NameX End Sub Adding the "On Error GoTo" will allow the code to also delete invalid names too. I couldn't find this anywhere so I though I'd post it ... -Brian |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Delete All Names - Even Invalid "#REF" Names
To delete all names simply -
Dim nm as Name for each nm in Activeworkbook.Names nm.delete Next I can't think of anything that would raise an error doing this and require some sort of error handler. Regards, Peter T "Brian B." wrote in message ups.com... FYI: The following code will delete all names in a workbook, including those with a "#REF" error: Sub Delete_Names() Dim NameX As Name On Error GoTo Nxt For Each NameX In Names ActiveWorkbook.Names(NameX.Name).Delete Nxt: Next NameX End Sub Adding the "On Error GoTo" will allow the code to also delete invalid names too. I couldn't find this anywhere so I though I'd post it ... -Brian |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Delete emty file names from "recent documents" Excel | Excel Discussion (Misc queries) | |||
Delete "Unused names" in a batch | Excel Discussion (Misc queries) | |||
Help,, need macro to replace 'space' in list of names with "." (dot), then compare ss | Excel Programming | |||
How do you hide macro names from showing in "Tools"? | Excel Programming | |||
Backup to specific folder if workbook names begins with "NSR" or "MAC" | Excel Programming |