Trouvé sur le net, vous connaissez ça? On dirait une macro qui démarre l'écoute interface et une autre qui la stoppe. Il y a aussi cet objet qui s'appelle Query Interface, qui semble ne plus être d'actualité, pourtant c'est bien ce que je veux, questionner l'interface pour savoir quelle forme je dessine...

Global vSelChangeListener 'Must be global Global vSelChangeBroadCast

'Run this macro to start event intercepting Sub StartListeningToSelChangeEvents Dim sPrefix$ Dim sService$ sPrefix = "sel_change_" sService = "com.sun.star.view.XSelectionChangeListener"

REM to register for a selection change, you must register with the REM current controller vSelChangeBroadCast = ThisComponent.getCurrentController

'Create a listener to intercept the selection change events vSelChangeListener = CreateUnoListener(sPrefix, sService)

'Register the listener to the document controller vSelChangeBroadCast.addSelectionChangeListener(vSelChangeListener) End Sub

Sub StopListeningToSelChangeEvents ' removes the listener vSelChangeBroadCast.removeSelectionChangeListener(vSelChangeListener) End Sub

Voici le lien :

http://book.opensourceproject.org.cn/officeeditor/office/openmacros/opensource/4374final/lib0087.html