Renaming A Tab

[mark_richards]

Hi All

Does anybody know if it is possible to rename tab as a cell
refference.

i.e. "Sheet1" becomes =A1

Does that mean anything???

Thanks

Mark

 

[Bob Phillips]

In VBA

Activesheet.Name = Range("A1").Value

--

HTH

RP
(remove nothere from the email address if mailing direct)


"mark_richards" <[email protected]>
wrote in message
news:[email protected]...

 

[Don Guillett]

you can use a macro

activesheet.name=range("a1")

--
Don Guillett
SalesAid Software
(e-mail address removed)
"mark_richards" <[email protected]>
wrote in message
news:[email protected]...

 

[O&O]

Is there any macro which can do same for selected sheets & selected
cells/range
(i.e not single cell & sheet)
Thxs

 

[Bob Phillips]

Something like?

For Each sh In Activeworkbook.Worksheets
If sh.Range("A1").Value <> "" Then
sh.Name = Range("A1").Value
End If
Next sh

--

HTH

RP
(remove nothere from the email address if mailing direct)

 

[Dave Peterson]

A small typo. I think Bob meant:

sh.Name = sh.Range("A1").Value

 

[Bob Phillips]

Thank-you sir!

--

HTH

RP
(remove nothere from the email address if mailing direct)