Hallo zusammen,
kennt jemand zufällig eine Möglichkeit, innerhalb einer Excel-Datei eine Fusszeile zu verwenden, die von einem anderen, der die Datei erhält, nicht geändert werden kann? Ohne Schreibschutz? Irgendwie über VBA? Schon mal danke vorab für Antworten.
Viele Grüsse, Nic
Hallo, Nic!
kennt jemand zufällig eine Möglichkeit, innerhalb einer
Excel-Datei eine Fusszeile zu verwenden, die von einem
anderen, der die Datei erhält, nicht geändert werden kann?
Ohne Schreibschutz? Irgendwie über VBA? Schon mal danke vorab
für Antworten.
Schreibschutz. Du könntest zwar vorm Ausdruck per VBA die Fusszeile wie gewünscht setzen, aber wenn der betreffende keine Makros zulässt oder in diesen rumspielt, ist Dir auch nicht geholfen.
Gruß, Manfred
Hallo Manfred,
danke für die Antwort. Wie genau würde ich es denn in VBA machen?
Gruss, Nic
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Hallo, Nic!
danke für die Antwort. Wie genau würde ich es denn in VBA
machen?
Schreibe die Ereignisprozedur (im Modul „DieseArbeitsmappe“) ungefähr wie folgt:
Private Sub Workbook\_BeforePrint(Cancel As Boolean)
Dim wsSheet As Worksheet
For Each wsSheet In Worksheets
With wsSheet.PageSetup
.LeftFooter = "&Z&F"
End With
Next wsSheet
End Sub
Setze dabei alle PageSetup-Eigenschaften nach eigenem Ermessen; in obigem Beispiel kommt links in die Fußzeile Pfad und Dateiname. Nimm Dir dazu am besten ein Makro auf, bei dem Du alle gewünschten Eigenschaften einstellst. Wenn in obigem Beispiel der Benutzer die linke und die rechte Seite der Fußzeile ändert, wird nur die linke mit Deiner Einstellung überschrieben, die rechte aber so belassen, wie es der Benutzer eingestellt hat.
Gruß, Manfred
Hallo Manfred,
hat geklappt, super, vielen Dank, genau, was ich wollte!
Viele Grüsse,
Nic
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]