Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
848to852
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
848to852
848to852
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

benutzerdef. Kopfzeilen

benutzerdef. Kopfzeilen
26.02.2007 16:53:33
Böttcher
Hallo,
ich habe folgendes Problem mit Kopfzeilen:
Die benutzerd. Kopfzeile soll erst auf der Seite 2 sichtbar werden.
Die Seite 1 besitzt eine Anschrift usw. und es sieht nicht gut aus, wenn darüber die
Kopfzeile zu lesen ist.
Kann mir hier jemand helfen ? Ich sage jetzt schon danke.
win.

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: benutzerdef. Kopfzeilen
26.02.2007 17:45:00
Peter
Hallo win,
mit einem eigenen Druck-Makro sollte es sicherlich funktionieren:

Sub Drucken()
Dim iPage As Integer
For iPage = 1 To ExecuteExcel4Macro("GET.DOCUMENT(50)")
With Worksheets("Tabelle1")
If iPage = 1 Then
.PageSetup.CenterFooter = "Seite 1"
.PageSetup.LeftHeader = ""
.PageSetup.CenterHeader = ""
.PageSetup.RightHeader = ""
Else
.PageSetup.CenterFooter = "Seite " & iPage
.PageSetup.LeftHeader = ""
.PageSetup.CenterHeader = "&16Dies ist die Kopfzeile"
.PageSetup.RightHeader = ""
End If
.PrintOut from:=iPage, To:=iPage
End With
Next iPage
End Sub

Gruß Peter
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige