Hi,

I want to name a range of cells with vba.
I tried: range("b5:b25).name="myname"

but this gives an error.

Thanks
Britt

Hi

you need to Set a range
try

Private Sub CommandButton1_Click()
Dim myname As Range
Set myname = Range("b5:b25")
myname.Select
End Sub

S


Britt wrote:
Hi,

I want to name a range of cells with vba.
I tried: range("b5:b25).name="myname"

but this gives an error.

Thanks
Britt

ActiveSheet.Names.Add Name:="MyName", RefersTo:="=$B$5:$B$25"


Britt wrote:
Hi,

I want to name a range of cells with vba.
I tried: range("b5:b25).name="myname"

but this gives an error.

Thanks
Britt

Sub NameRange()
Range("B5:B25").Select
ActiveWorkbook.Names.Add Name:="MyRange", RefersToR1C1:= _
"=Sheet1!R5C2:R25C2"
End Sub


Vaya con Dios,
Chuck, CABGx3



"Britt" wrote:

Hi,

I want to name a range of cells with vba.
I tried: range("b5:b25).name="myname"

but this gives an error.

Thanks
Britt

Thanks to all ..

"CLR" schreef in bericht
...
Sub NameRange()
Range("B5:B25").Select
ActiveWorkbook.Names.Add Name:="MyRange", RefersToR1C1:= _
"=Sheet1!R5C2:R25C2"
End Sub


Vaya con Dios,
Chuck, CABGx3



"Britt" wrote:

Hi,

I want to name a range of cells with vba.
I tried: range("b5:b25).name="myname"

but this gives an error.

Thanks
Britt

You missed a double quote:

range("b5:b25).name="myname"
should be
range("b5:b25").name="myname"

Britt wrote:

Hi,

I want to name a range of cells with vba.
I tried: range("b5:b25).name="myname"

but this gives an error.

Thanks
Britt

--

Dave Peterson