| Habe die Fragen lösen können,
(Unterbericht erstellen, Verknüpfen Haupt-/UB)
allerdings hat mir der Seitenfuß dazwischengeschossen:
pro Empfänger entstehen 2 Seiten, d.h. bei einem Serienbrief, der nur 1x aufgerufen wird für 4000 Empfänger, entstehen 8000 Seiten.
Je Empfänger soll auf Vor- und Rückseite gedruckt werden. Die Rückseite (= die Seite mit der geraden Seitenzahl) soll keinen Seitenfuß enthalten.
Das hat nicht geklappt in "Seitenfuß_Format":
booGerade = IIf(Me.Page Mod 2 = 0, True, False)
If booGerade Then
Seitenfuß.Visible = False
Else
Seitenfuß.Visible = True 'ehemals true
End If
Es wird nur die erste Seite mit Seitenfuß versehen, alle nachfolgenden (S. 2 bis 8000) enthalten keinen!
Was läuft da falsch?
|
