I am trying to do some of the same thing except with merged cells. I am
using cells A1, A2, B1, & B2 for the month and year and I would like that in
the worksheet name. I am making a calendar for a motel to use to book its
rooms.
I opened VBA for the worksheet and put that in, but nothing happened. I
changed the cell range from $a$1 to $a$1..$b$2.

Thanks.

Jeff

"Bob Phillips" wrote:

Mike,

Try this code

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

On Error GoTo ws_exit:
Application.EnableEvents = False
If Target.Address = "$A$1" Then
Sh.Name = Target.Value
End If

ws_exit:
Application.EnableEvents = True
End Sub

'This is workbook event code.
'To input this code, right click on the Excel icon on the worksheet
'(or next to the File menu if you maximise your workbooks),
'select View Code from the menu, and paste the code



--

HTH

RP
(remove nothere from the email address if mailing direct)


"Mike Allen" wrote in message
...
I am trying to rename a worksheet by using a defined field (cell).
Example,
if I type in Dave Wilson in cell A1, is there a way to define the
worksheet
as Dave Wilson, without manually changing it everytime? And as I cahnge
names, the worksheet names will change also...Thanks in advance for your
time.
Mike allen