La siguiente función es de utilidad para establecer el nombre del libro activo en una celda:
MiNombre()
No se utilizan argumentos en esta función.
Function MiNombre() As String
MiNombre=ThisWokbook.Name
End Function
Esta función , variación de la anterior, establece la ruta de acceso al archive y nombre del libro active en una celda:
MiNombreCompleto()
No se utilizan argumentos con esta función.
Function MiNombreCompleto() As String
MiNombreCompleto=ThisWorkbook.FullName
End Function
Technorati Tags: Funciones
