Wie funktioniert bei MS Office Word das Einfügen leerer Seite bei ungeraden Zahlen in Serienbriefen?

hi,

und zwar habe ich verschiedene Serienbriefdokumente mit unterschiedlicher Seitenanzahl (mal 4, mal 5, mal 3,...) . Diese Serienbriefe möchte ich doppelseitig drucken. Das Problem hierbei ist, dass der Drucker bei ungerader Anzahl der Seiten, die Rückseite des ersten Briefes mit der Anfangsseite des zweiten Briefes bedruckt. Wie kann ich sagen, dass es bei ungerader Anzahl der Seiten eine Leerseite einfügt?

Ich hab mir schon was mit Modulo überlegt, aber ich weiß nicht an welcher Stelle ich es anwenden soll, damit es funktioniert.

Es geht hier um Microsoft Office Word 2007

Cancel = (Page Mod 2 = 0)

Answer 1

[maximilianus7]

folgendes makro in ein modul im projekt Normal einfügen und ausbauen:

Sub AutoOpen()  
  Dim pages As Integer    
  pages = Selection.Information(wdNumberOfPagesInDocument)  
  MsgBox "Anzahl Seiten: " & spagedoc, vbInformation, "Seiteninfo"
End Sub

(also pages auf gradzahligkeit abfragen und ev. leereseite dranhängen)