One way is to put this in the sheet module of the sheet where the cell to be
changed is located.
right click sheet tabview codecopy/paste thismodify to suitsave
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address < "$H$1" Then Exit Sub
Sheet6.Name = Target
End Sub

--
Don Guillett
SalesAid Software

"John H." <John wrote in message
...
I'm trying to find a way to make a worksheet name change according to a
field
name . It would be nice to make the worksheet rename according to what is
typed in a specific field in a different worksheet. Anybody have any idea
if
this can be done ?