Hi

I got a lot of named ranges which refer to a specific workbook however
the values.

for example i have a names range with the following value
='[test.xls]Information'!$C$123"

is there a way to go through all the ranges and delete only the
reference to the test workbook?


--
funkymonkUK
------------------------------------------------------------------------
funkymonkUK's Profile: http://www.excelforum.com/member.php...o&userid=18135
View this thread: http://www.excelforum.com/showthread...hreadid=555964

Sub tester()
Dim wb As Workbook
Dim nName As Name

Set wb = Workbooks("test.xls")

For Each nName In Names
If nName.RefersToRange.Parent.Parent Is wb Then
nName.Delete
End If
Next nName

End Sub

HTH
--
AP

"funkymonkUK" a
écrit dans le message de news:
...

Hi

I got a lot of named ranges which refer to a specific workbook however
the values.

for example i have a names range with the following value
='[test.xls]Information'!$C$123"

is there a way to go through all the ranges and delete only the
reference to the test workbook?


--
funkymonkUK
------------------------------------------------------------------------
funkymonkUK's Profile:
http://www.excelforum.com/member.php...o&userid=18135
View this thread: http://www.excelforum.com/showthread...hreadid=555964

if i am correct this will actually delete the named range which is not
exactly what i was looking for as the ranges are used for calculations.


--
funkymonkUK
------------------------------------------------------------------------
funkymonkUK's Profile: http://www.excelforum.com/member.php...o&userid=18135
View this thread: http://www.excelforum.com/showthread...hreadid=555964