Herbers Excel-Forum - das Archiv
unterschiedliche Kopf- und Fusszeile
Betrifft: unterschiedliche Kopf- und Fusszeile
von: Anne
Geschrieben am: 19.02.2005 12:05:19
hallo,
habe in einer Tabelle ein Blatt, welches u.U. mehrere Seiten hat. Wie kann ich steuern, dass beim Druck dieses Tabellenblattet bei der ersten Seite nur eine Kopfzeile und bei den restlichen Seiten nur die Fusszeile erscheint?
Betrifft: AW: unterschiedliche Kopf- und Fusszeile
von: th.heinrich
Geschrieben am: 19.02.2005 13:53:04
hallo Anne,
das scheint etwas kompliziert zu sein, folgendes zur
Kopfzeile
https://www.herber.de/index.html?https://www.herber.de/mailing/116900h.htm
gruss thomas
Betrifft: AW: unterschiedliche Kopfdenken
von: Katrin
Geschrieben am: 19.02.2005 15:11:35
Ich liebe dich wemm du nicht da bist schatz
Betrifft: AW: unterschiedliche Kopf- und Fusszeile
von: K.Rola
Geschrieben am: 19.02.2005 14:12:39
Hallo,
so z.B.:
Option Explicit
Sub Drucken()
Dim ws As Worksheet, S As Integer, i As Integer
Set ws = Sheets("Tabelle1")
S = ExecuteExcel4Macro("Get.Document(50)")
With ws.PageSetup
.LeftHeader = ""
.CenterHeader = "Rabdudai"
.RightHeader = ""
.LeftFooter = ""
.CenterFooter = ""
.RightFooter = ""
End With
For i = 1 To S
If i > 1 Then
ws.PageSetup.CenterHeader = ""
ws.PageSetup.CenterFooter = "Schnuppeldiduppeldi"
End If
ws.PrintOut from:=i, To:=i
Next
End Sub
Gruß K.Rola
Betrifft: AW: unterschiedliche Kopf- und Fusszeile
von: Anne
Geschrieben am: 19.02.2005 16:26:07
Vielen Dank für eure Hilfe!
Ich habe sogar noch verschiedene If-Funktionen eingebaut und es hat trotzdem prima geklappt!!
Gruß Anne