Saberexcel - Funções Personalizadas
Funcão personalizada Nome_Livro retorna o nome do Livro ativo
Function Nome_livro()
Nome_livro = ActiveWorkbook.Name
End Function
Para obter um exemplo a partir da função acima (retorna o nome do Wkb Ativo)
1-) Tecle Alt + F11 e acesse o módulo do VBE(Visual Basic Editor)
2-) Insira o código da função acima no módulo (comum)
3-) retorne para a folha de planilha
4-) em uma célula qualquer digite: =Nome_Livro()
Aprenda tudo sobre o Aplicativo Microsoft Excel VBA com Saberexcel