Fusszeile autom. Pfadangabe

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Mit Hilfe eines kleinen Prozesses (oder Makros) aus Microsoft Visual Basic® für Applikationen können Sie den vollständigen Pfad und Dateinamen in jeden beliebigen Abschnitt (links, Mitte oder rechts) von entweder Kopf- oder Fußzeile einfügen. Da Sie den vollständigen Pfad einfügen möchten, muss die Arbeitsmappe vor Verwenden des Makros natürlich gespeichert werden.
So erstellen Sie dieses Makro Drücken Sie ALT+F11, um Visual Basic-Editor zu starten, und klicken Sie dann im Menü Einfügen auf Modul. Geben Sie den folgenden Code ein:


Sub UpdateFooter()
ActiveSheet.PageSetup.LeftFooter = ActiveWorkbook.FullName
End Sub

und wechseln Sie dann zu dem Arbeitsblatt, in das Sie Pfad und Dateiname einfügen möchten. Führen Sie das Makro aus (zeigen Sie im Menü Extras auf Makro, und klicken Sie dann auf Makros; der Name des Makros ist UpdateFooter), und klicken Sie dann im Menü Datei auf Seitenansicht, um im Ausdruck auf dem Bildschirm den korrekten Ort des Pfades zu überprüfen.
Mit diesem Makro wird der aktuelle Pfad und Dateiname in die linke Fußzeile des aktiven Arbeitsblattes eingefügt. Bevor Sie irgendwelche Pfadangaben zur Fußzeile hinzufügen können, muss die Arbeitsmappe gespeichert werden.
Um Pfad und Dateiname zum mittleren oder rechten Abschnitt der Fußzeile hinzuzufügen, ändern Sie LeftFooter im Code entweder in CenterFooter oder RightFooter. Um die Informationen zur Kopfzeile hinzuzufügen, verwenden Sie LeftHeader, CenterHeader, oder RightHeader

Hallo
Lösung
Standardmäßig wird in EXCEL der Pfadname einer Arbeitsmappe nicht mit in die Kopf- bzw. Fußzeilen aufgenommen.
Diese Aufgabe kann durch ein VBA-Makro gelöst werden.
Bitte beachten Sie: Die Verwendung des hier abgedruckten Makro- bzw. Programm-Codes geschieht auf Ihre eigene Verantwortung. Microsoft stellt Ihnen diesen Makro bzw. dieses Programmlisting ohne Gewähr auf Richtigkeit, Vollständigkeit und/oder Funktionalität, sowie ohne Anspruch auf Support zur Verfügung. Der Makro bzw. das Programmlisting soll lediglich exemplarisch die Funktionsweise des hier abgedruckten oder auf der Diskette enthaltenen Beispiels aufzeigen.
Beachten Sie bitte außerdem, daß alle Makro- bzw. Programmzeilen die mit einem Apostroph (') beginnen, zusätzlichen Text des Programmierers, der die Funktionsweise des Codes erläutert, darstellen.
Ein Unterstrich (_) als Zeilenfortsetzungszeichen im Programmcode weist darauf hin, daß eine Code-Anweisung, die in diesem Artikel nicht in eine Zeile paßt, in der nächsten Zeile fortgesetzt wird. Im Visual Basic-Modul können Sie diese Anweisung in eine Zeile schreiben. Sie können aber auch dort das Zeilenfortsetzungszeichen verwenden.
Das folgende Makro fügt den aktuellen Pfad und den Dateinamen in den linken Bereich der Fußzeile ein. Die Arbeitsmappe muß gespeichert werden, bevor Sie Informationen zum Pfad in die Fußzeile eingeben können.
Beispielmakro zur Darstellung der Funktionsweise


Sub UpdateFooter()
ActiveSheet.PageSetup.LeftFooter = ActiveWorkbook.FullName
End Sub

Um in Excel für Windows 95 und Excel 97 ein Visual Basic Modul in eine Arbeitsmappe einzufügen, öffnen Sie bitte das Menü EINFÜGEN, zeigen auf MAKRO und klicken VISUAL BASIC MODUL. In Excel 97 und in Excel 98 für Macintosh aktivieren Sie einfach den Visual Basic Editor, durch Drücken der Tastenkombination [Alt]+[F11]. Klicken Sie dann im Menü EINFÜGEN auf den Menüpunkt MODUL.
Denken Sie bitte daran, daß Sie das Makro einmal aufrufen müssen, damit in der Fußzeile der Pfad und Dateiname der Arbeitsmappe angezeigt wird.
mfg

Beliebteste Forumthreads (12 Monate)

3 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread