Seite 1 von 1

[gelöst]Writerdatei öffnen und warten bis fertig

Verfasst: Do, 09.07.2015 16:46
von Devil
Ich habe mal wieder ein für mich schier unlösbares Problem.
Ich bekomme einen Aufruf aus einem Programm, mit welchem ein Makro gestarten wird in Open Office (Version 4.1.1). Dieses Soll dann eine .odt datei starten, warten bis diese vollständig geladen ist und dann den Rest des Makros ausführen. Ich hoffe ich habe mich verständlich ausgedrückt und mir kann jemand Helfen.

Re: Writerdatei öffnen und warten bis fertig

Verfasst: Do, 09.07.2015 17:36
von F3K Total
Hi,
denke das Folgende sollte funktionieren, die Messagebox kommt erst dann, wenn die Variable oDoc gefüllt wurde, also der Ladevorgang beendet ist.

Code: Alles auswählen

SUB Load_an_Execute_Makro
    Dim aProps() as new com.sun.star.beans.PropertyValue
    surl = converttourl("C:\Users\<USER>\Desktop\Test_geladen.odt")
    oDoc = StarDesktop.loadComponentFromURL(sUrl, "_Blank", 0, aProps)
    msgbox "geladen"
end sub
Gruß R

Re: Writerdatei öffnen und warten bis fertig

Verfasst: Do, 09.07.2015 17:44
von clag
Hallo Devil,

dazu braucht es zwei Schritte

1. start von OO mit übergabe der des Pfad und Dateinamen der zu ladenden Datei, also zB

Code: Alles auswählen

soffice.exe "c:\Dokumente und Einstellungen\User\Eigene Dateien\macro_on_load_test.odt"
2. in der Datei ist ein Makro mit dem Ereignis "Menü > Extras > Anpassen > Ereignisse_ Dokument öffnen_Makro... " verknüpft.

Re: Writerdatei öffnen und warten bis fertig

Verfasst: Fr, 10.07.2015 09:14
von Devil
Hallo F3K Total
Deine Methode Funktioniert Super!
Vielen vielen Dank!

Danke aber auch an clag das du dich bemüht hast :)