name sheets

[ncaldwell]

Is there any way auto name a spread sheet based on a value in a cell,

 

[Matt Rogers]

Hi and welcome to the board.

Sheetname is in A1:

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
On Error GoTo Out
If Target = Range("A1") Then ActiveSheet.Name = Range("A1").Value
Out:
End Sub

 

[ncaldwell]

Thank you, that works great, one of these days i need to learn the VBA

 

[Matt Rogers]

Thank's for your feedback
and a lot of fun with excel.