Pfad und Dateiname in Fußzeile

Forumthread: Pfad und Dateiname in Fußzeile

24.09.2002 19:00:13

Udo

Hallo,

wer weiß das wie die Formel dafür heißt...

Danke Udo

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Re: Pfad und Dateiname in Fußzeile

24.09.2002 19:03:21

Hajo_Zi
Re: Pfad und Dateiname in Fußzeile

24.09.2002 19:03:54

PeterW

Re: Pfad und Dateiname in Fußzeile

24.09.2002 19:03:21

Hajo_Zi

Hallo Udo

47. Aktueller Datenpfad in Kopf-/Fußzeile
'das geht mit folgender VBA-Zeile:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
' Fußzeile Mitte
ActiveSheet.PageSetup.CenterFooter = ActiveWorkbook.FullName & "\" & ActiveSheet.Name '(Komplette Dateiname einschl. Phad + Register)
' Kopfzeile Links
Worksheets("Tabelle1").PageSetup.LeftHeader = ThisWorkbook.Path & "\" '(nur Phad)
' Left=Links; Center=Mitte; Right=Rechts
' Header=Kopfzeile; Footer=Fußzeile
End Sub

Gruß Hajo

Re: Pfad und Dateiname in Fußzeile

24.09.2002 19:03:54

PeterW

Hallo Udo,

ist nur per VBA möglich. Schau mal in der Recherche bzw. den Beispielen.

Gruß
Peter

Infobox / Tutorial

Pfad und Dateiname in der Fußzeile einfügen

Schritt-für-Schritt-Anleitung
Häufige Fehler und Lösungen
Alternative Methoden
Praktische Beispiele
Tipps für Profis
FAQ: Häufige Fragen

Schritt-für-Schritt-Anleitung

Um den Dateinamen und den Pfad in die Fußzeile einer Excel-Datei einzufügen, benötigst du ein wenig VBA (Visual Basic for Applications). Hier ist eine einfache Anleitung:

Öffne deine Excel-Datei.
Drücke ALT + F11, um den VBA-Editor zu öffnen.
Klicke im Menü auf Einfügen und wähle Modul.

Füge den folgenden Code in das Modul ein:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
   ' Fußzeile Mitte
   ActiveSheet.PageSetup.CenterFooter = ActiveWorkbook.FullName & "\" & ActiveSheet.Name
   ' Kopfzeile Links
   Worksheets("Tabelle1").PageSetup.LeftHeader = ThisWorkbook.Path & "\"
End Sub

Schließe den VBA-Editor und speichere die Datei.
Drucke das Dokument, um die Fußzeile zu sehen.

Mit diesem VBA-Skript wird der vollständige Dateiname sowie der Pfad in der Fußzeile eingefügt.

Häufige Fehler und Lösungen

Fehler: VBA funktioniert nicht oder wird nicht ausgeführt.
- Lösung: Stelle sicher, dass Makros in Excel aktiviert sind. Gehe zu Datei > Optionen > Trust Center > Einstellungen für das Trust Center > Makroeinstellungen und aktiviere die entsprechenden Optionen.
Fehler: Die Fußzeile zeigt nicht den richtigen Pfad.
- Lösung: Überprüfe, ob der Code korrekt eingefügt wurde und die richtige Tabelle (z.B. "Tabelle1") im Code angegeben ist.

Alternative Methoden

Falls du kein VBA verwenden möchtest, kannst du die Fußzeile auch manuell anpassen:

Gehe zu Seitenlayout.
Klicke auf Drucktitel.
Wähle im Dialogfeld die Registerkarte Kopf- und Fußzeilen.
Wähle eine der Optionen für die Fußzeile und füge manuell den gewünschten Text ein.

Beachte jedoch, dass diese Methode keinen dynamischen Pfad oder Dateinamen einfügt.

Praktische Beispiele

Hier sind zwei Anwendungsbeispiele:

Pfad und Dateiname in der Mitte der Fußzeile:
- Der VBA-Code oben fügt den kompletten Dateinamen und Pfad in die Mitte der Fußzeile ein.
Nur der Dateiname in der Fußzeile:
- Um nur den Dateinamen (ohne den Pfad) anzuzeigen, kannst du den Code wie folgt anpassen:
```
ActiveSheet.PageSetup.CenterFooter = ActiveSheet.Name
```

Tipps für Profis

Automatisierung: Du kannst den VBA-Code erweitern, um den Pfad und Dateinamen auch bei bestimmten Ereignissen automatisch zu aktualisieren.
Benutzerdefinierte Fußzeilen: Experimentiere mit verschiedenen Platzhaltern in der Fußzeile, um beispielsweise das aktuelle Datum oder die Seitenzahl hinzuzufügen.
Sicherung: Stelle sicher, dass du regelmäßige Sicherungen deiner Excel-Dateien machst, wenn du VBA verwendest, um Datenverlust zu vermeiden.

FAQ: Häufige Fragen

1. Kann ich VBA in Excel Online verwenden?
Nein, VBA ist nur in der Desktop-Version von Excel verfügbar.

2. Was passiert, wenn ich die Datei unter einem anderen Namen speichere?
Der VBA-Code wird den neuen Dateinamen automatisch in der Fußzeile anzeigen, solange das Skript korrekt funktioniert.

Beliebteste Forumthreads (12 Monate)