Dynamic Naming of RANGE

[dkaltsas]

HELP!!!

Range("B11").Select
Range(Selection, Selection.End(xlDown)).Select
ActiveWorkbook.Names.Add Name:="CtrlAcctName", RefersTo:="=" & "Score Card" & "!" & _
ActiveRange


why can't I make this thing work???? I was trying to name the selected Rnage in the previous line!!! Any ideas???

 

[btadams]

try changing ActiveRange to Selection.Address

 

[dkaltsas]

try changing ActiveRange to Selection.Address

unfortunately the named range, "CtrlAcctName" cannot be used further down as it is empty!!


This is what I am trying to do:

Range("B11").Select
Range(Selection, Selection.End(xlDown)).Select
ActiveWorkbook.Names.Add Name:="CtrlAcctName", RefersTo:="=" & "Score Card" & "!" & _
Selection.Address
Range(CtrlAcctName).Find(what:=AcctNumber).Activate

 

[btadams]

does it have to be a dynamic range or could you use:

ActiveWorkbook.Names.Add Name:="CtrlAcctName", RefersTo:="=" & "Score Card" & "!" & _
Range("D11:D65536").Address