L'informatique à votre portée
L'informatique prêt-à-porter

Faites appel à moi pour vos formations
sur les dpts 81, 31, 82, 11 et 67 (Strasbourg)
Confiez moi vos développements Office

FacebookTwitterGoogle BookmarksLinkedin

Nom du classeur, de l'onglet, du dossier contenant le classeur

Imprimer E-mail
5 mars 2014

Dans une cellule, vous pouvez utiliser la fonction CELLULE("nomfichier") pour insérer le nom complet d'un fichier, mais vous n'avez aucune fonction qui vous propose le simple nom du fichier, le chemin du classeur et le nom de l'onglet. Vous pouvez donc tapez ces fonctions dans un module du classeur et les utiliser comme fonction dans une cellule.

Public Function Nom_Classeur() As String
On Error Resume Next
   Nom_Classeur = ActiveWorkbook.Name
End Function

Public Function Chemin_Classeur() As String
On Error Resume Next
   Chemin_Classeur = ActiveWorkbook.Path
End Function

Public Function Nom_Onglet(Plage As Range) As String
On Error Resume Next
   Nom_Onglet = Plage.Parent.Name
End Function

Dans une procédure si vous avez besoin du nom complet du classeur (chemin & nom) utiliser la propriété FullName :(ActiveWorkbook.FullName).