Endlosdruck

  • Word

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von rgomez.

    Endlosdruck

    Hallo! Ich möchte ein Dokument mit 250 Seiten ausdrucken.
    Dieses Dokument ist in A6 und es sollen jeweils auf einer A4 Seite gedruckt werden. Das Problem dabei ist, dass immer die gleichen Seite 4x auf einer Seite stehen sollen. Ein Tipp aus dem Internet besagt, dass man
    jeweils die Seite 4x bei Pages eintragen soll. Gibt es eine Möglichkeit bei "Pages" eine Variable zu hinterlegen? (um bei der nächsten Schleife dann "2;2;2;2" zu bekommen...dann "3;3;3;3" etc.)

    Code:

    Application.PrintOut FileName:="", Range:=wdPrintRangeOfPages, Item:= _
    wdPrintDocumentWithMarkup, Copies:=1, Pages:="1;1;1;1", PageType:= _
    wdPrintAllPages, Collate:=False, Background:=True, PrintToFile:=False, _
    PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
    PrintZoomPaperHeight:=0
    Benutzt eine Variable Dim i as Integer = 1, zu der bei jedem Durchlauf +1 addiert wird.

    Wie du siehst du brauchst ein String, der String beinhaltet IMMER in deinem Fall 4 gleiche Zahlen.

    Also z.B

    VB.NET-Quellcode

    1. Dim str as String = i & ";" & i & ";" & i & ";" & i
    2. Pages:=str
    3. i+=1


    Bei dem Code oben , solltest du bei jedem i ---> Cstr(i)
    Life doesn't give you a datasheet. Sometimes the docs are wrong and you have to try it.

    Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „rgomez“ ()