Hi!
Just a comment: why use a macro when you have formula to do the job?
When needed, I use the following one:
=RIGHT(CELL("filename",A2),LEN(CELL("filename",A2) )-FIND("]",CELL("filename",A2)))

--
KR

V.


"Marcelo" wrote:

Hi all,

I am trying to use this Chip Person function, it doesn't work, if I use
=thissheetname()

Function ThisSheetName() As String
Application.Volatile True
ThisSheetName = Application.Caller.Parent.Name
End Function

who knows why?

regards from Brazil - going to the 6th *
Marcelo