Application.Caller

[Guest]

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

 

[Ardus Petus]

Works by me!

I entered =ThisSheetName() in a cell, it returned Feuil1, which is exact.

HTH

 

[Guest]

Hi Ardus, its return #name? here.

did you paste the code in a Module or in a class Module

regards
Marcelo



"Ardus Petus" escreveu:

 

[Ardus Petus]

I pasted it in a standard module.

Cheers,
--
AP

Hi Ardus, its return #name? here.

did you paste the code in a Module or in a class Module

regards
Marcelo



"Ardus Petus" escreveu:

 

[Guest]

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)))

 

[Ardus Petus]

I did not actually enter the formula, but used the function wizard.

enter:
=[PERSONAL.XLS].ThisSheetName()

HTH

 

[Guest]

thanks Ardus, it's works

regards from Brazil

"Ardus Petus" escreveu:

I did not actually enter the formula, but used the function wizard.

enter:
=[PERSONAL.XLS].ThisSheetName()

HTH