Setting event handler in basic (solved)

[Pansmanser]

It is a simple matter to associate a macro with an event using the Tools-Customise menu. Is there an equally simple way to do this from basic? The event handler stuff seems very complicated for something which is so simple by manual means. Specifically I want an impress file to do something when the presentation closes (OnViewClosed).

[Pansmanser]

I’ve found the answer to this by modifying pierre-yves’ (to whom thanks) code in:

How to set a macro to an sheet-event by a macro

Hi, my scenario is the following: I’m copying a sheet internally of a Libre Calc (4.4.5.2) document by a macro (Basic). In the (source-) sheet I’ve linked a script to a sheet-event (OnChange). By copying this (source-) sheet the new sheet has no macro defined for the sheet-event. May there’s a way to solve this problem, but i don’t think so because if i do the copy manually the macro is also missing in the new sheet. I thought that i could add the macro to the sheet-event via a script/macro, …

dim Prop(1) as new com.sun.star.beans.PropertyValue
Prop(0).name = "EventType" : Prop(0).value = "Script"
Prop(1).name = "Script"
Prop(1).value = "vnd.sun.star.script:Standard.ImpressModule.ExitStuff?language=Basic& location=document" 
ThisComponent.Events.ReplaceByName("OnViewClosed", Prop())

Simples!