Nombre del archivo en una celda

En un módulo nuevo o existente pon la siguiente función:

Public Function Nombre() As String
Nombre = ThisWorkbook.Name
End Function

La puedes llamar desde cualquier celda del mismo libro como:
=Nombre()

El objeto ThisWorkbook es el único que puede devolver siempre bien el nombre
del archivo que contiene la función, cualquier otro puede fallar bajo ciertas
condiciones.

Saludos

"nose" escribió:

Hola a todo el foro

Cual seria la función, o la metodología para en una celda, el nombre del
Libro con que fue grabado


gracias

Juan