Fußzeile mit "Zuletzt geändert von"

16/11/2007 - 10:36 von Kerstin | Report spam
Hallo,

wir möchten in die Fußzeilen der Blàtter schreiben, wer das Dokument
zuletzt geàndert hat. Ich habe gelesen, das geht nur mit VBA.
Ist die

ActiveWorkbook.BuiltinDocumentProperties("Last Author")

die richtige Eigenschaft dafür?
Das Ganze soll ja automatisch erfolgen.
Deshalb würde man die Fußzeile wohl ins AutoOpen-Makro
packen und wo noch?

Wer hat so etwas schon mal gemacht und kann mir Tipps dazu geben?

Vielen Dank schon mal
Gruß Kerstin

PS: Excel 2002
 

Lesen sie die antworten

#1 stefan onken
16/11/2007 - 13:47 | Warnen spam
hallo Kerstin,
"Last Author" wird aktualisiert, wenn die Datei gespeichert wird. Die
Fussnote würde bei AutoOpen erst nach dem nàchsten öffnen der Datei
aktualisiert. Falls das ok ist, reicht AutoOpen, ansonsten müsste ein
zeitgesteuertes Makro zB 2 Sekunden nach speichern die Fussnote
aktualisieren.

Sub Auto_Open() steht in einem normalen Modul (VBA-Editor über
Einfügen/Modul). Es gibt auch Sub Workbook_Open(), dass dann im Modul
DieseArbeitsmappe stehen muss (findest du im VBA-Editor links im
Projekt-Explorer). Allgemein wird gesagt, besser Workbook_Open zu
nehmen. Der eigentliche Code sieht dann so aus:

ActiveSheet.PageSetup.CenterFooter = _
ActiveWorkbook.BuiltinDocumentProperties("Last Author")

Gruß
stefan




On 16 Nov., 10:36, "Kerstin" wrote:
Hallo,

wir möchten in die Fußzeilen der Blàtter schreiben, wer das Dokument
zuletzt geàndert hat. Ich habe gelesen, das geht nur mit VBA.
Ist die

ActiveWorkbook.BuiltinDocumentProperties("Last Author")

die richtige Eigenschaft dafür?
Das Ganze soll ja automatisch erfolgen.
Deshalb würde man die Fußzeile wohl ins AutoOpen-Makro
packen und wo noch?

Wer hat so etwas schon mal gemacht und kann mir Tipps dazu geben?

Vielen Dank schon mal
Gruß Kerstin

PS: Excel 2002

Ähnliche fragen