Maybe something like this

Function ThisSheet() As String
ThisSheet = Application.Caller.Parent.Name
End Function

called from a worksheet with =ThisSheet()

--

HTH

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


"Barb Reinhardt" wrote in message
...
I've seen some VB code that does this, but can't seem to find it right
now.
Try doing a Google search for it.

"Steve" wrote in message
...
Is there a function that returns the current Worksheet name? I am
creating
multiple Worksheets by Copying and Pasting the same "template" sheet and
would like as much of the worksheet specific text as possible to be
generated automatically.

Thanks, Steve