I can't reproduce it:

? range("myname").Address(externaL:=True)
[Book1]locACTIVE_Template!$P$49,$P$86
? activeworkbook.Names("MyName").RefersTo
=locACTIVE_Template!$P$49,locACTIVE_Template!$P$86
? activeworkbook.Names("MyName").ReferstoRange.addre ss(external:=True)
[Book1]locACTIVE_Template!$P$49,$P$86

set rng = activeWorkbook.Names("MyName").RefersToRange
? rng.Address(external:=True)
[Book1]locACTIVE_Template!$P$49,$P$86

Go into Insert=Names and make sure your definition is still good.

--
Regards,
Tom Ogilvy

"Andre Achtermeier" wrote in message
...
hi,

i defined a Name "MyName" like

=locACTIVE_Template!$P$49;locACTIVE_Template!$P$86

in VBA i wrote

Dim rng As Range
Set rng = ActiveWorkbook.Names("MyName").RefersToRange

but the code fails and the RefersToRange is nothing.

any idea?



--
André Achtermeier
----------------------------------------------
www.appliedtechnologies.de
----------------------------------------------