Private Sub Worksheet_Activate()
Sheets(1).Name = Range("H2").Value
End Sub

Enter the code above on the required worksheet i.e. double click the sheet
in the VB editor which you see listed under Microsoft Excel Objects

"Nigel" wrote:


Hi

I have a shared worksheet and I would like the tab name to change
automatically to the name entered in cell H2.....I am very
inexperienced at visual basic so would be very grateful if somebody
could point me in the right direction with this.

Many thanks in anticipation


Nigel


--
Nigel
------------------------------------------------------------------------
Nigel's Profile: http://www.excelforum.com/member.php...o&userid=25696
View this thread: http://www.excelforum.com/showthread...hreadid=393602