Benutzerdefinierte Kopfzeile

Forumthread: Benutzerdefinierte Kopfzeile
3 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Benutzerdefinierte Kopfzeile

11.02.2007 20:45:31

Christian

Hallo,
da ich auch im Archiv nicht das passende gefunden habe, muss ich die Frage(n) mal ins Forum stellen:
Wie richte ich meine Seite ein, das mein logo nur auf der ersten Seite gedruckt wird?
Falls das nur via vba möglich sein sollte, wie sieht der Code dazu aus? (es sind nicht immer mehrere Seiten, aber meistens)
Für eure Tips und Lösungen bedanke ich mich schon mal im voraus.
MfG Christian

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Benutzerdefinierte Kopfzeile

11.02.2007 22:30:48

fcs
AW: Benutzerdefinierte Kopfzeile

11.02.2007 23:31:55

Christian
AW: Benutzerdefinierte Kopfzeile

12.02.2007 06:10:09

Hans

AW: Benutzerdefinierte Kopfzeile

11.02.2007 22:30:48

fcs

Hallo Christian,
wenn das Logo nur auf der 1. Seite erscheinen soll, dann plazierst du es am besten nicht in der Kopfzeile sondern als Grafik am Anfang der Tabelle, dabei unter Format-Grafik-Eigenschaften Option "von Zellposition und -Größe unabhängig" wählen.
Gruss
Franz

AW: Benutzerdefinierte Kopfzeile

11.02.2007 23:31:55

Christian

Hallo Franz,
danke für die Antwort, leider fkt. das in meiner Tabelle nicht, da sonst Daten durch die Grafik verdeckt werden. Zeilenhöhe ändern geht auch nicht, da Einteilung sonst nicht mehr passt.(Anschriftfeld für Fensterbriefumschläge dann zu weit unten).
Stelle die Frage daher nochmal auf offen.
MfG Christian

AW: Benutzerdefinierte Kopfzeile

12.02.2007 06:10:09

Hans

Hallo Christian,
wie folgt:


Sub PrintPages()
Dim iPage As Integer, iCount As Integer
iCount = ExecuteExcel4Macro("INDEX(GET.DOCUMENT(50),1)")
For iPage = 1 To iCount
If iPage > 1 Then ActiveSheet.Pictures(1).Visible = False
ActiveSheet.PrintOut From:=iPage, To:=iPage, Copies:=1, Collate:=True
Next iPage
ActiveSheet.Pictures(1).Visible = True
End Sub

gruss hans