|
|
|
Thema:
|
Excel 97/2000 |
|
Problem:
|
In dem aktuellen Tip beschäftigen wir uns mit
der Lösung eines der am häufigsten gestellten Fragen: Im Dialogfeld Datei-Seite
einrichten können Sie für Kopf- und Fusszeilen einen
Platzhalter verwenden, der von Excel automatisch in den aktuellen
Dateinamen umgesetzt wird. Leider gibt es standardmässig keine Möglichkeit,
mit dem Dateinamen auch den entsprechenden Pfad auszugeben, um das spätere
Auffinden der Datei anhand des Ausdrucks zu erleichtern. Mit Hilfe
einer kleinen VBA-Prozedur beheben Sie das Problem.
|
|
Lösung:
|
Folgen Sie unserer Schritt-für-Schritt-Anleitung,
um in Zukunft den kompletten Pfad zu einer Arbeitsmappe per Mausklick
in die Kopf- oder Fusszeile einzutragen:
- Starten Sie Excel und wählen Sie das Menü
Fenster-Einblenden
an. Sollte dieser Menüpunkt nicht zur Verfügung stehen, ist bei
Ihnen bisher noch keine persönliche Makroarbeitsmappe angelegt
worden. Der Einsatz einer solchen Datei ist sehr empfehlenswert,
weil Sie hier alle Makros ablegen können, die Ihnen ständig zur
Verfügung stehen sollen. Die Datei wird beim Start von Excel
automatisch geladen. Um die persönliche Makroarbeitsmappe
anzulegen, führen Sie den nächsten Schritt aus; ansonsten können
Sie ihn überspringen.
- Sie können die Makroarbeitsmappe manuell
anlegen, aber einfacher ist es, wenn Sie das Menü Extras-Makro-Aufzeichnen
anwählen, in der Liste Makros speichern
in den Eintrag "Persönliche
Makroarbeitsmappe" wählen und die Standardeinstellungen
einfach mit Ok bestätigen. Führen
Sie dann einige beliebige Arbeitsschritte in Excel aus und halten
Sie den Makrorecorder per Mausklick auf das "Stop"-Symbol
an. Anschliessend verlassen Sie Excel und bestätigen die Frage
nach der Speicherung der persönlichen Makroarbeitsmappe. Danach
starten Sie Excel wieder.
- Wechseln Sie mit Alt+F11 in die
VBA-Entwicklungsumgebung und öffnen Sie ein Modul der Datei
PERSONL.XLS. Hier geben Sie den folgenden Code ein:
Public Sub
PfadInFusszeile()
ActiveSheet.PageSetup.LeftFooter = _
ActiveWorkbook.FullName
End Sub
- Mit dieser kleinen VBA-Prozedur wird der
komplette Pfad der aktuellen Arbeitsmappe in den linken Bereich
der Fusszeile des aktuellen Tabellenblattes gesetzt. Wenn Sie
einen anderen Bereich der Fusszeile oder Kopfzeile verwenden möchten,
ersetzen Sie "LeftFooter" durch einen der folgenden
Begriffe: LeftHeader, CenterHeader, RightHeader, CenterFooter und
RightFooter.
- Wählen Sie das Menü Datei-Personl.Xls
speichern an und verlassen Sie den VBA-Editor.
- Rufen Sie das Dialogfeld Fenster-Einblenden
auf und klicken Sie zweimal auf "Personl.xls".
- Legen Sie über Extras-Anpassen
ein Symbol an, über das Sie die Prozedur "PfadInFusszeile"
aufrufen können und blenden Sie die persönliche
Makroarbeitsmappe wieder aus. Bitte achten Sie darauf, beim nächsten
Beenden von Excel die Frage nach dem Speichern der Änderungen
wieder zu bestätigen.
In Zukunft genügt ein Mausklick auf das neu
angelegte Symbol, um den kompletten Pfad an der gewünschten Position
in der Kopf- oder Fusszeile einzufügen. Bitte beachten Sie, dass
dieser Vorgang nicht dynamisch ist. Wenn sich also Speicherort oder
Name Ihrer Datei ändern sollten, müssen Sie das Symbol erneut
anklicken, um die Kopf-/Fusszeile zu aktualisieren. |
|
