Return the name of cell to sheet name

[AndreaOlsson]

How do I return the cell name to the sheet name. When I start a ne
sheet I write a name in a cell and I want it to automatically renam
the sheet to that cell name

//Andrea Olsso

 

[R.VENKATARAMAN]

introduce this in <thisworkbook> event
code begins
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target
As Range)
ActiveSheet.Name = Range("a1")
End Sub
code end

when you activate or insert a worksheet and then when you enter some value
in A1 the sheet name changes
if you have already invoked this macro again for the existing sheet if you
want to change the name just change the value of A1.

make a few experiments



=====================================================