Sie k�nnen den kompletten Dateipfad in der Kopf- oder Fu�zeile angeben.
Hierzu wird ein kleines Makro ben�tigt,
welches den Dateipfad zentriert in der Kopfzeile ausgibt:

Sub Kopfzeile_formatieren()
   Worksheets("Tabelle1").PageSetup.CenterHeader = _
   ThisWorkbook.FullName
End Sub

Um nur den Dateinamen in der Kopf- oder Fu�zeile zu haben,
�ndern Sie den o.g. Code: ThisWorkbook.Name

Nat�rlich muss es nicht zentriert in der Kopfzeile sein !
Hier sind weitere M�glichkeiten:

LeftHeader CenterHeader RightHeader LeftFooter CenterFooter RightFooter

Kopfzeile linksb�ndig Kopfzeile zentriert Kopfzeile rechtsb�ndig Fu�zeile rechtsb�ndig Fu�zeile zentriert Fu�zeile rechtsb�ndig

Update 16.02.2000
Da ich in letzter Zeit oft danach gefragt wurde:

ThisWorkbook.Fullname gibt den gesamten Pfad
der Datei zur�ck, in der sich auch das Makro befindet !

ActiveWorkbook.Fullname gibt den gesamten Pfad
der aktiven Datei zur�ck.

Des weiteren wurde mir oft die Frage gestellt,
wie man allen Tabellenbl�ttern die Kopf- oder Fu�zeile zuweisen kann:

Sub Alle_Kopfzeilen()
   For x = 1 To ActiveWorkbook.Sheets.Count
      ActiveWorkbook.Sheets(x).PageSetup.CenterHeader = _
         ActiveWorkbook.FullName
   Next
End Sub

Beachten Sie aber dabei folgendes:

Der Pfad wird nur dann gesetzt,
wenn die entsprechende Datei bereits gespeichert wurde !

Sollte die Datei an einem anderen Ort gespeichert werden,
so muss das Makro erneut ausgef�hrt werden.
Die Kopf- oder Fu�zeile wird nicht automatisch angepasst !