=MID(CELL("Filename",A1),FIND("]",CELL("Filename",A1))+1,255)

Entered in a cell exactly as above will return the name of the sheet.

Note: workbook must have been saved at least once.

Couple more using VBA

Sub getname()
MsgBox ThisWorkbook.ActiveSheet.Name
End Sub

Sub get_Sheetname()
Dim num As Long
num = InputBox("Type a number")
MsgBox "Sheet" & num & "'s name is " & Sheets(num).Name
End Sub



Gord Dibben MS Excel MVP


On Mon, 30 Nov 2009 15:09:02 -0800, HpyTrvlr69
wrote:

My question is simple.

Does anyone out here know of a function that returns the name of a specific
TAB in a workbook?