
rem ------------------------------------------------------------------
rem ---------Drucken nur letze Seite auf Überweisungsträger--
rem ------------------------------------------------------------------
dim args7(0) as new com.sun.star.beans.PropertyValue
args7(0).Name = "Printer"
args7(0).Value = "Drucker Ueberweisung"
dispatcher.executeDispatch(document, ".uno:Printer", "", 0, args7())
rem ----------------------------------------------------------------------
dim args8(2) as new com.sun.star.beans.PropertyValue
args8(0).Name = "Copies"
args8(0).Value = 1
args8(1).Name = "Collate"
args8(1).Value = true
?????????Drucke nur die letzte Seite. Welcher Befehl kommt hier rein???????
dispatcher.executeDispatch(document, ".uno:print", "", 0, args8())
end sub