Gibt es nee Möglichkeit über einen Code die Kopfzeilen
Unterschiedlich ,je nach Seitenzahl, zu Programmieren?
Also Seite 1 --- keine Kopfzeile---
Seite 2 --- "Hier ist ne Kopfzeile"
usw
wer kann helfen
wolfgang
für die verschiedenen Tabellenblätter ist das kein Problem, aber für 1 Blatt unterschiedliche Kopfzeilen zu generieren geht IMHO nur mit einem Workaround:
Schalte den Makrorecorder ein, definiere eine Kopfzeile, druck NUR die erste Seite aus, definiere dann wieder eine neue Kopfzeile, drucke dann NUR die 2. Seite aus etc. etc.
Anschließend Makrorecorder ausschalten.
Das Makro - welches optisch irre lang sein wird (weil es eben viel überflüssigen Code enthalten wird - aber sei´s drum) dann einer Schaltfläche zuweisen.
Wahrscheinlich nicht die professionellste Antwort, aber ich denke, dass es funktioniert.
Gruß Boris
wolfgang
StandardModule: basMain
Sub KopfZeile()
With ActiveSheet
.PageSetup.LeftHeader = "Seite &P von &N"
.PrintPreview
End With
End Sub
die horizontalen Seitenumbrüche - bzw. die dazugehörigen Zelladressen, kannst du auslesen. Als Ansatz mal ein Mini-Makro zum Testen:
Bezieht sich auf das erste Tabellenblatt und zeigt nacheinander in der msgbox die Adresse zum Seitenumbruch an.
Gruß Boris
Es geht um verschiedene Kopfzeilen INNERHALB eines Tabellenblattes.
Gruß Boris