Bonjour,
Pinsuto a écrit :
Francois Gatto a écrit :
Bonjour,
Pinsuto a écrit :
Je suis particulièrement intéressé par ce fil de discussion et
d'avance merci aux contributeurs.
Pour ma part, je cherchais à lancer une application CALC en faisant
disparaître la barre de statut, les barres de menu.
Après lancement il ne devait rester que la barre de menus et le cadre
Windows.
Avec les méthodes proposées, je rencontre les problèmes suivants.
-- Mon fichier Calc effectue des calculs à l'ouverture. Du coup, la
barre de statut s'agite. Au final, après lancement de la macro, il
reste une barre grise vide qui gelée.
Si tu le peux, place ton fichier ici http://www.cijoint.fr/
-- Si je transmets ce fichier à d'autres utilisateurs, il faut que
j'utilise une macro qui rétablit la configuration initiale du poste
sur lequel est utilisé mon fichier.
Existe-t-il donc un moyen pour neutraliser la barre de statut, fermer
les barres d'icône au lancement de mon fichier Calc.
Voir exemple ci-après.
Puis à sa
fermeture, rétablir la configuration telle qu'elle était sur le poste ?
En assignant la macro aux évènements Activation / Desactivation du
document, je pense que tu résoudras ton problème.
Voici un début :
Sub BarOnOff
'### Documentation ###
'http://api.openoffice.org/docs/common/ref/com/sun/star/frame/XLayoutManager.html
'http://wiki.services.openoffice.org/wiki/Framework
Dim oLayout as object
Dim sToolBar as String
Dim sStatusBar as String
Dim sMenuBar as String
sToolbar = "private:resource/toolbar/standardbar"
sStatusBar = "private:resource/statusbar/statusbar"
sMenuBar = "private:resource/menubar/menubar"
oLayout = ThisComponent.CurrentController.Frame.LayoutManager
If oLayout.isElementVisible( sMenuBar ) Then
oLayout.hideElement( sMenuBar )
Else
oLayout.showElement( sMenuBar )
End If
End Sub
Francois
Génial, merci ça marche pratiquement en entier.
Super !
Alors pour faire profiter les autres de mon expérience je précise la
chose suivante :
- pour que la macro s'exécute au démarrage et en quittant, je l'ai
assigné sur "ouverture de document" et "fermeture de document"
(attention au "de").
Ok.
- on peut agir sur toutes les barres, sauf sur la barre de formule.
Je n'ai pas trouvé le moyen par cette voie pour la faire disparaître pui
réapparaître. C'est un cas à part manifestement. Ou bien il faut passer
par des fonctions trop complexes pour moi qui n'ont pas la souplesse de
ce que tu m'as proposé ici.
Je n'ai pas testé cela. Si j'ai du temps ...
Si quelqu'un a une idée pour l'InputLine, r je crois que c'est son
type,, je suis toujours preneur en vue d'améliorer mon petit projet.
Je ne comprends pas ce que tu veux avec "une idée pour l'InputLine".
Peux tu préciser ?
Francois
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]