Bonjour Ennio-Sr
Message du 2006-12-02 17:47:

This is my testing macro:

---------------------------------
sub closeOO
dim document   as object
dim dispatcher as object

document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

dispatcher.executeDispatch(document, ".uno:Save", "", 0, Array())
document.close(true)

end sub
---------------------------------


The macro recorder is misleading in naming its variable "document". Because it is only the frame of the document.
Close your macro like this:
ThisComponent.close(True)

Note that OOo will terminate only if there is no other document open, and no use of the Quick Starter (Windows).

   Bernard

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

Reply via email to