rename worksheet
 

I want to rename a worksheet using a name in a cell - the problem is then how
to refer to that sheet on the codeeg:

Dim sname As String
sname = Range("A2")
Sheets("QUOTE").Name = sname
Range("B7").Select
ActiveCell.FormulaR1C1 = "=sname!R[-4]C[-2]"

etc.....

it renames the sheet but when it runs the last name it cant find sname - is
the problem my syntax?

Thanks,

rename worksheet
 

You need to separate the sname variable from the fixed text

Dim sname As String
sname = Range("A2")
Sheets("QUOTE").Name = sname
Range("B7").FormulaR1C1 = "=" & sname & "!R[-4]C[-2]"


--
HTH

Bob Phillips

"Ciara" wrote in message
...
I want to rename a worksheet using a name in a cell - the problem is then
how
to refer to that sheet on the codeeg:

Dim sname As String
sname = Range("A2")
Sheets("QUOTE").Name = sname
Range("B7").Select
ActiveCell.FormulaR1C1 = "=sname!R[-4]C[-2]"

etc.....

it renames the sheet but when it runs the last name it cant find sname -
is
the problem my syntax?

Thanks,

rename worksheet
 

Thank you.