Function to capture Sheetxx name in cell

[djl0525]

I'm looking for a VBA solution to put a sheetname in a cell.

I want to put this in a cell

=FUNCTION(Sheet01)

And get the name of the tab in return.

Does anyone know of a function that does this?

DJ

 

[myall_blues]

Is this something like what you're after?

Function TABNAME(sheetnum As Long) As String
TABNAME = Sheets(sheetnum).Name
End Function

Usage: =TABNAME(1) will return the name of the tab. If you wanted to use 'Sheet01' in the function you could add some code to extract the number out of the string.

Regards

Murray