Workbook.Path (Excel)

Renvoie une valeur de type String qui représente le chemin d’accès complet au classeur/fichier représenté par cet objet Workbook.

Dim strPath As String
strPath = ActiveWorkbook.Path