weiss Jemand wie ich einen erstellten Serienbrief weder in einer Datei, noch auf den Drucker, sondern auf den Monitor zum Bearbeiten ausgeben kann?
Bis jetzt habe ich folgendes:
Code: Alles auswählen
Set objServiceManager = CreateObject("com.sun.star.ServiceManager")
Set objStardesktop = objServiceManager.createinstance("com.sun.star.frame.Desktop")
Set MyMerge = CreateUnoService("com.sun.star.text.MailMerge")
MyMerge.DataSourceName = "API"
MyMerge.DocumentURL = "file:///c|/test.odt"
MyMerge.Commandtype = 0
MyMerge.Command = "mySource"
MyMerge.outputtype = 2
MyMerge.execute (dummy)
MfG Hurby