Fusszeile auf erster Seite anders oder gar nicht

Bild

Betrifft: Fusszeile auf erster Seite anders oder gar nicht
von: Thommy K.
Geschrieben am: 04.04.2005 11:07:57
Hallo,
ich möchte, dass meine Fusszeile (ein Bild rechte Seite) nicht auf der ersten Seite meines Arbeitsblattes beim Ausdrucken erscheint. Habe jetzt ein wenig herumexperimentiert, bin aber immer gescheitert. Daher nun meine Frage an all diejenigen, die mehr Erfahrung mit Makros haben als ich. Ist dies möglich? Wenn ja, wie kann ich das anstellen?
Danke

Bild

Betrifft: AW: Fusszeile auf erster Seite anders oder gar nicht
von: Hajo_Zi
Geschrieben am: 04.04.2005 11:29:41
Hallo Thommy,
Du mußt den Druck über ein Makro machen.

Sub Drucken()
'   Bilder in Kopfzeile nur für XP
'   ich glaube der Ansatz ist von Ramses (Rainer)
    Dim iPage As Integer
    For iPage = 1 To ExecuteExcel4Macro("GET.DOCUMENT(50)")
        With Worksheets("Tabelle1")
            If iPage = 1 Then
                .PageSetup.CenterFooter = "Seite 1"
                .PageSetup.RightHeaderPicture.Filename = _
                    "E:\Eigene Dateien\Eigene Bilder\Bilder\bbapril_big08.jpg"
            Else
                .PageSetup.CenterFooter = "größer Seite 1"
                .PageSetup.RightHeaderPicture.Filename = _
                    "E:\Eigene Dateien\Eigene Bilder\Bilder\bbtracy_big10.jpg"
            End If
            .PrintOut from:=iPage, To:=iPage
        End With
    Next iPage
End Sub


Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Fusszeile auf erster Seite anders oder gar nicht"