Bonsoir,
essaie ceci :
Code:
Sub chemin_acces()
Dim truc As String
truc = ActiveWorkbook.Path
fichier = ActiveWorkbook.Name
With ActiveSheet.PageSetup
.LeftFooter = truc & fichier
End With
End Sub
Sinon saches aussi que le nom du fichier peut être inséré dans une feuille en cliquant sur l'icone se trouvant dans la barre d'icones du pied de page.
