Word - Drucken

Computer: Software & Programmierung Visual Basic
#1

Hallo,

ich möchte gern in Word (2002) zwei verschiedene Ausdrucke machen in einem Dokument.
Der eine Ausdruck ist „die letzte Seite“ (kann man über Selection.Information herausfinden) und das andere ist „der Rest davor“.

Nun kann man ja über „Range“ das „From“ und das „To“ festlegen. In der Hilfe finde ich jedoch nur vordefinierte werte wie "From:=„1“, To:=„3“. Ich möchte jedoch an dieser Stelle Variablen einsetzen (eben dass er nur die letzte seite ausdruckt oder von „1“ bis „vorletzte“).

Wie kann man das am besten lösen?

LG Tobi@s

#2

ich möchte gern in Word (2002) zwei verschiedene Ausdrucke
machen in einem Dokument.
Der eine Ausdruck ist „die letzte Seite“ (kann man über
Selection.Information herausfinden) und das andere ist „der
Rest davor“.

Hallo Tobi@s,

Sub Letzte()
Dim Anz As Integer
Anz = Selection.Information(wdNumberOfPagesInDocument)
ActiveDocument.PrintOut Range:=wdPrintFromTo, from:=CStr(Anz), To:=CStr(Anz)
End Sub
’
Sub OhneLetzte()
Dim Anz As Integer
Anz = Selection.Information(wdNumberOfPagesInDocument)
ActiveDocument.PrintOut Range:=wdPrintFromTo, from:=„1“, To:=CStr(Anz - 1)
End Sub

Gruß
Reinhard

#3

Hallo,

danke - es funktioniert wunderbar :smile:

LG