Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Aktuellen Dateipfad aktualisieren

Gruppe

Dateien

Problem

Wie kann ich veranlassen, daß der aktuelle volle Dateiname bei jedem Druck in die Fußzeile übernommen wird?

Lösung
Geben Sie den Ereigniscode in das Klassenmodul der Arbeitsmappe ein.

ClassModule: DieseArbeitsmappe

Private Sub Workbook_BeforePrint(Cancel As Boolean)
   ActiveSheet.PageSetup.LeftFooter = _
      ThisWorkbook.FullName
End Sub