5 messages in org.openoffice.fr.progRe: [prog] Masquer toutes les barres ...
FromSent OnAttachments
Arnaud POUSSIERJul 4, 2005 1:03 am 
JovialJul 4, 2005 1:52 am 
JovialJul 4, 2005 2:08 am 
Arnaud POUSSIERJul 4, 2005 2:09 am 
Arnaud POUSSIERJul 4, 2005 4:00 am 
Actions with this message:
Paste this link in email or IM:
Paste this link in email or IM:
Atom feed for this thread
Paste this URL into your reader:
Subject:Re: [prog] Masquer toutes les barres d'outilsActions...
From:Arnaud POUSSIER (apou@tiscali.fr)
Date:Jul 4, 2005 4:00:05 am
List:org.openoffice.fr.prog

Salut, le code fonctionne trés bien, c'est un bon moyen de tout masquer en une seule opération. Par contre je cherche toujour le moyen de cacher la barre "plein écran".

Merci pour ton aide

Merci pour ces infos,

Je teste et je tiens au courant

@+ Arnaud

Je corrige car la macro fonctionne comme une bascule, c'est donc la même qui affiche ou masque les barre, par contre attention il faut prévoir un bouton pour tout réafficher, car on n'a même plus accès aux menu avec Alt, alors que avec l'affichage plein écran on le conserve. Jluc

Bonjour regarde ici: http://www.oooforum.org/forum/viewtopic.phtml?t=6890

Sur 1.1.2 le code suivant fonctionne:

Sub AfficherMasquerBarres oFrame = ThisComponent.CurrentController.Frame Dim noArgs1()

dispatcher = createUnoService("com.sun.star.frame.DispatchHelper") dispatcher.executeDispatch(oFrame, ".uno:MenuBarVisible", "", 0, noArgs1()) dispatcher.executeDispatch(oFrame, ".uno:ObjectBarVisible", "", 0, noArgs1()) dispatcher.executeDispatch(oFrame, ".uno:OptionBarVisible", "", 0, noArgs1()) dispatcher.executeDispatch(oFrame, ".uno:NavigationBarVisible", "", 0, noArgs1()) dispatcher.executeDispatch(oFrame, ".uno:StatusBarVisible", "", 0, noArgs1()) dispatcher.executeDispatch(oFrame, ".uno:ToolBarVisible", "", 0, noArgs1()) dispatcher.executeDispatch(oFrame, ".uno:MacroBarVisible", "", 0, noArgs1()) dispatcher.executeDispatch(oFrame, ".uno:FunctionBarVisible", "", 0, noArgs1()) 'on CalcFrames dispatcher.executeDispatch(oFrame, ".uno:InputLineVisible", "", 0, noArgs1()) End sub

Arnaud POUSSIER a écrit :

Bonjour à tous,

Est-il possible de masquer toutes les barres d'outils présente à l'ouverture d'un fichier et les retrouver à la fermeture du fichier. J'avais la macro pour Excel, mais bien évidement incompatibilité totale.

Merci de votre aide.

Bonne journée