How do I delete ExternalRata range names?

[Nathan Gutman]

Whenever I run a web query it inserts a new ExternalData name into the
name box. So it keeps going ExternalData1, ExternalData2 and so on.
1. How can I stop that?
2. How can I manually delete those names? Nothing seems to be able to
get at them.
Thanks,
Nathan

 

[pfsardella]

Try this.

Sub DeleteWorkbookNames()
'' Deletes extraneous names left from queries.

Dim Nim As Name

For Each Nim In ActiveWorkbook.Names
If Nim.Name Like "*ExternalData*" Then Nim.Delete
Next Nim

End Sub

HTH
Paul

 

[Nathan Gutman]

Thanks Paul, I will give it a try.

Try this.

Sub DeleteWorkbookNames()
'' Deletes extraneous names left from queries.

Dim Nim As Name

For Each Nim In ActiveWorkbook.Names
If Nim.Name Like "*ExternalData*" Then Nim.Delete
Next Nim

End Sub

HTH
Paul