Références relatives en Excel (partie 2)

J'ai déjà traité de la question en utilisant uniquement des fonctions de la feuille de calcul. Mais on peut se faciliter la vie au moyen d'une petite fonction VBA qui retournera le nom de dossier du document actif. Voici cette fonction:


Public Function DocPath() As String
'renvoie le chemin du document actif
    DocPath = ThisWorkbook.Path
End Function