Sub makesheetorgoto()
On Error GoTo makeit
Sheets("joe").Select
Exit Sub
makeit:
Sheets.Add.Name = "joe"
End Sub

--
Don Guillett
SalesAid Software

"AOU" wrote in message
...
Is there a code that anables you to search for a worksheet by reference to
the Tabs, and if it exsists display the sheet or if it does not exsists
create a new worksheet from a template (say sheet1)?
--
AOU