Gisbert Friege wrote:

> Liebe Makro-SpezialistInnen,
> 
> nehme ich per Makro-Aufzeichnen einen Aufruf des Druckerdialogs 
> (Datei-Drucken...) und des anschließenden Druckens auf...
> 
> sub DokumentDrucken
> dim document   as object
> dim dispatcher as object
> document   = ThisComponent.CurrentController.Frame
> dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
> dim args1(1) as new com.sun.star.beans.PropertyValue
> args1(0).Name = "Copies"
> args1(0).Value = 1
> args1(1).Name = "Collate"
> args1(1).Value = false
> dispatcher.executeDispatch(document, ".uno:Print", "", 0, args1())
> end sub
> 
> ... dann wird bei Aufruf diese Makros direkt auf den aktuellen Drucker 
> gedruckt, aber nicht der Druckerdialog aufgerufen.
> 
> Wie kann ich aus einem eigenen Makro heraus den Drucker-Dialog aufrufen, 
> um dort vor dem Drucken z.B. die Anzahl der Ausdrucke einzustellen?

Lass einfach die Parameter weg:

sub DokumentDrucken
  dim document   as object
  dim dispatcher as object
  document   = ThisComponent.CurrentController.Frame
  dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
  dim args()
  dispatcher.executeDispatch(document, ".uno:Print", "", 0, args())
end sub

Ciao,
Mathias


-- 
Mathias Bauer - OpenOffice.org Application Framework Project Lead
Please reply to the list only, [EMAIL PROTECTED] is a spam sink.

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Antwort per Email an