Here is a one-line UDF:

Function shname(i As Integer) As String
shname = Sheets(i).Name
End Function

For example, =shname(2) will return the name of the 2nd sheet
--
Gary''s Student - gsnu200768


"Palle korsholm" wrote:

I have a woorkbook and I like to put the names of one of the sheets into a
cell on one of the other sheets.

EX
Iin sheet 1 cell A1 I like to have the name of the 3th sheet in the workbook




--
Palle korsholm