� 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 !

�