Pfad automatisch ausgeben
17.12.2003 15:24:09
m@t
Wie muss ich folgenden Code ändern und wo abspeicher,
damit bei jeder neuen und wenn möglich auch bereits
bestehenden Datei, der genaue Pfad in der Fusszeile erscheint?
Sub FusszeileMitPfad()
ActiveSheet.PageSetup.LeftFooter = _
ActiveWorkbook.Path & "/" & ActiveWorkbook.Name
End Sub
Ich müsste das hauptsächlich für unsere Mitarbeiter
haben, und die haben keine Ahnung von VBA, deshalb
sollte es bei jeder Mappe, die man speichert, automatisch
den Pfad angeben.
Vielen Dank für Eure Hilfe
lg m@t