vba - デュプレックスプリンタでのさまざまなトレイからの印刷（Word 2003）

Question

レターヘッド付きの1つのトレイから1ページ目を印刷し、別のトレイから他のすべてのページを印刷するマクロを作成しています。

これは、プリンタデュプレックスとは別に正常に機能するため、背面から前面に、上下逆になります。

逆さまにならないようにして、ページ上のすべてを180度回転させる方法はありますか？

または、を使用して二重化を無効にしますacPRDPSimplex

コードは次のとおりです。

Sub PrintHeaded()
findprinter
Dim VNumberofPages As Integer
ActiveDocument.Repaginate
VNumberofPages = ActiveDocument.BuiltInDocumentProperties(wdPropertyPages)
If VNumberofPages = 1 Then
    vprintrange = "1"
    ActiveDocument.PageSetup.FirstPageTray = LetterHeadTray
Else: vprintrange = "1,2"
   ActiveDocument.PageSetup.FirstPageTray = LetterHeadTray
End If
        Application.PrintOut FileName:="", Range:=wdPrintRangeOfPages, Item:= _
        wdPrintDocumentContent, Copies:=1, Pages:=vprintrange, PageType:= _
        wdPrintAllPages, ManualDuplexPrint:=False, Collate:=True, Background:= _
        True, PrintToFile:=False, PrintZoomColumn:=0, PrintZoomRow:=0, _
        PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0, OutputFileName:="", _
        Append:=False
If VNumberofPages > 2 Then
    vprintrange = "1 - " & VNumberofPages
    With ActiveDocument.PageSetup
        .FirstPageTray = LetterHeadTray
        .OtherPagesTray = PlainPaperTray
    End With
        Application.PrintOut FileName:="", Range:=wdPrintRangeOfPages, Item:= _
        wdPrintDocumentContent, Copies:=1, Pages:=vprintrange, PageType:= _
        wdPrintAllPages, ManualDuplexPrint:=False, Collate:=True, Background:= _
        True, PrintToFile:=False, PrintZoomColumn:=0, PrintZoomRow:=0, _
        PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0, OutputFileName:="", _
        Append:=False
End If

サブ終了