Margo möchte einen Dateipfad und einen Dateinamen in ein Excel-Arbeitsblatt einfügen.

Sie möchte in der Lage sein, die Informationen entweder in eine Zelle oder in die Kopf- / Fußzeile einzufügen. Dies ist in Excel ziemlich einfach.

Um den Dateipfad und den Dateinamen in eine Zelle einzufügen, verwenden Sie die CELL-Arbeitsblattfunktion folgendermaßen:

=CELL("filename")

Diese Formel gibt den gesamten Pfad, Dateinamen und Registerkartennamen des aktuellen Arbeitsblatts wie folgt zurück:

E:\My Data\Excel\[Budget.xls]Sheet1

Wenn Sie die Klammern und den Blattnamen entfernen möchten, können Sie die folgende Variante der Formel verwenden:

=SUBSTITUTE(LEFT(CELL("filename"),FIND("]",CELL("filename"))-1),"[","")

Die LEFT-Funktion entfernt alles von der rechten Klammer bis zum Ende der Zeichenfolge, während die SUBSTITUTE-Funktion die linke Klammer entfernt.

Das Einfügen eines Pfads und eines Dateinamens in eine Kopf- oder Fußzeile ist einfach:

  1. Wählen Sie das Arbeitsblatt aus, dessen Kopf- oder Fußzeile Sie ändern möchten.

  2. Wählen Sie im Menü Datei die Option Seite einrichten. Excel zeigt das Dialogfeld Seite einrichten an.

  3. Klicken Sie je nach Bedarf auf die Schaltflächen Benutzerdefinierte Kopfzeile oder Benutzerdefinierte Fußzeile. Word zeigt entweder das Dialogfeld Kopf- oder Fußzeile an. (Siehe Abbildung 1.)

  4. Positionieren Sie die Einfügemarke wie gewünscht in den Feldern Linker Abschnitt, Mittlerer Abschnitt oder Rechter Abschnitt.

  5. Klicken Sie auf die Schaltfläche Datei. (Es sieht aus wie ein Dateiordner, aus dem ein Stück Papier herausragt.) Excel fügt an der Einfügemarke den folgenden Code ein:

  6. Klicken Sie zweimal auf OK, um beide Dialogfelder zu schließen.

Wenn Sie das Arbeitsblatt drucken, ersetzt Excel die Codes in Schritt 5 durch den Pfadnamen bzw. den Dateinamen der Arbeitsmappe.

Wenn Sie Excel 97 oder Excel 2000 verwenden, funktionieren die obigen Schritte nicht. Stattdessen müssen Sie ein Makro verwenden, um den Pfad und den Dateinamen einzufügen:

Sub DoFullPath()

ActiveSheet.PageSetup.CenterFooter = _       ActiveWorkbook.FullName End Sub

Dieses Makro funktioniert auch in späteren Versionen von Excel. Um einen anderen Ort für den Pfad und den Dateinamen anzugeben, ändern Sie einfach CenterFooter an einen anderen Ort (z. B. LeftFooter, RightFooter, LeftHeader, CenterHeader oder RightHeader). Wenn Sie sich für den Makroansatz entscheiden, müssen Sie daran denken, ihn jedes Mal auszuführen, wenn Sie entweder den Dateinamen der Arbeitsmappe ändern (Sie verwenden Speichern unter) oder den Ort ändern, an dem die Arbeitsmappe auf Ihrer Festplatte gespeichert ist.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (2875) gilt für Microsoft Excel 97, 2000, 2002 und 2003. Eine Version dieses Tipps für die Multifunktionsleistenschnittstelle von Excel (Excel 2007 und höher) finden Sie hier: