how to rename the sheet in programming

[Guest]

hi there

i just want to program that excel can automatic rename the sheet's name once I key-in in the specific cell.
For example
a1 = testin
result : the active sheet will be named as "testing"

 

[Chip Pearson]

The code, simply, is

ActiveSheet.Name = Range("A1").Text

You probably want to use an event procedure to make this happen
automatically. For example, put the following code in the code module for
the worksheet in question:

Private Sub Worksheet_Change(ByVal Target As Range)
Me.Name = Me.Range("A1").Text
End Sub



--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com

hi there;

i just want to program that excel can automatic rename the sheet's name

once I key-in in the specific cell.