Bonjour
Joël, bonjour à tous.
Bon, puisque vous insistez...
... voici comment j'ai fini par trouver :
Rappel : contrairement à Writer ou Calc, Draw ne permet pas l'enregistrement de macros.
Je me suis donc inspiré d'une macro enregistrée sous Writer pour comprendre quels arguments passer et comment les passer.
J'ai choisi l'action Montrer/Cacher le
Navigateur (par le menu Affichage) qui me retourne ce code :
Code : Tout sélectionner
sub showHideNavig
rem ----------------------------------------------------------------------
rem define variables
dim document as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
rem ----------------------------------------------------------------------
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "Navigator"
args1(0).Value = false
dispatcher.executeDispatch(document, ".uno:Navigator", "", 0, args1())
rem ----------------------------------------------------------------------
dim args2(0) as new com.sun.star.beans.PropertyValue
args2(0).Name = "Navigator"
args2(0).Value = true
dispatcher.executeDispatch(document, ".uno:Navigator", "", 0, args2())
end sub
Il ne me reste plus qu'à
trouver le mot-clé qui doit remplacer Navigator...
Pour obliger OOo à générer un fichier de config des menus dans mon environnement personnel,
j'ai ajouté un élément de menu dans Affichage, du module Draw bien entendu.
Ensuite je suis allé consulter le fichier de config :
menubar.xml
dans la racine : 'monDossierPerso'/.openoffice.org/3/user/config/soffice.cfg/modules/sdraw/menubar
qui m'a tout raconté sur le sujet, par une simple recherche de "
Volet page"
Code : Tout sélectionner
<menu:menuitem menu:id=".uno:LeftPaneDraw" menu:helpid=".uno:LeftPaneDraw" menu:label="Volet page"/>
Euh... oui, c'est vrai que sans fouiller un peu, beaucoup, voire passionément...
ce n'est pas du tout-cuit !