Sub filename()
MsgBox ("This Workbook's name is " & ThisWorkbook.Name)
End Sub

--
Best wishes,

Jim


"Magnivy" wrote:

Hello,

I'm trying to create a custom function that would return the file name of
the active workbook (as I dont know a worksheet function that would do so
directly), and am not having much luck. I tried

Function filename()
filename = ActiveWorkbook.Name
End Function

but this returns an error. Any suggestions would be greatly appreciated.

Thank You!

Magnivy