Dateiname und Pfad in Fußzeile einfügen

 

Die Datei muss dazu aber mindestens 1 mal gespeichert worden sein, sonst kann der Pfad ja nicht bekannt sein. Also die Datei zuerst speichern und anschließend das Makro ausführen.

 

Sub Pfad_in_Fußzeile()
With ActiveSheet.PageSetup
.LeftFooter = ThisWorkbook.FullName
End With
End Sub