Re: [fr-users] MAcro

Re,
OK ce que tu proposes marche bien sauf de temps en temps erreur :
"if (oUnElement.model.supportsService("com.sun.star.formula.FormulaProperties"))
then"  dans la procedure PysMasquerFormules et PysAfficherFormules


Autre détail important que je n'avais pas bien précisé j'aimerai que les
formules ne se cachent que dans mon style de paragraphes à remplacer par
des trous ...
Je sais c'est assez complexe mais en fait je tape mes cours de maths
complets et souhaiterait "remplacer des réponses contenant parfois des
formules  par un trou plus grand pour pouvoir écrire au TBI en classe
Merci d'avance du suivi de mes questions.
FS



Le 05/03/2015 18:08, SAUTON Frédéric a écrit :
> Bonsoir,
> Super pour la macro c'est exactemetn ce que je cherchais.
> Vu votre efficacité et vos compétences, je me permets de vous demander 
> autre chose dans le même style :
> J'aimerai faire"disparaitre" un texte pour faire un texte à trou mais 
> en mettant un "vide" à la place (plus grand d'ailleurs que mon texte 
> d'origine) avec une macro :
> sub macro_cacher
>
> trou=thiscomponent.GetStyleFamilies.GetByName("CharacterStyles").GetByName("Cours 
> à cacher")
>     With trou
>         If .charColor=0 Then
>             .charColor=&hFFFFFFF
>             .charKerning=200
>         Else
>             .charColor=0
>             .charkerning=0
>         End If
>     End With
>
> end sub
>
> Cela marche bien sauf pour cacher des formules faites avec Dmaths qui 
> elles restent malheureusement ...
>
>
> Le 05/03/2015 10:06, pierre-yves.samyn@laposte.net a écrit :
> > Bonjour
> >
> > > Je voudrai créer une macro permettant de cacher tel ou tel type de 
> > > paragraphe de façon automatique
> > Il n'est pas forcément nécessaire de passer par une macro pour cela. 
> > Tu peux
> > insérer les parties de texte à masquer dans des sections (menu 
> > Insertion).
> > Les sections peuvent être masquées sous condition et la condition peut
> > être le test d'une variable.
> >
> > Voir cette page sur l'insertion de variables:
> > https://wiki.documentfoundation.org/FR/FAQ/Writer/045
> >
> > Sinon, tu peux fonder une solution par macro sur l'utilisation de
> > styles de paragraphes. Appliquer un style de paragraphe particulier
> > au texte à masquer. Puis utiliser une macro pour modifier l'attribut
> > "masqué" du texte. Par exemple :
> >
> > sub PysMasquerPara
> >
> > dim oStyles as object
> > dim oStyle as object
> >
> > oStyles = thiscomponent.StyleFamilies.getByName("ParagraphStyles")
> >
> > if oStyles.hasByName("Masquer") then
> >     oStyle = oStyles.getByName("Masquer")
> >     ostyle.charHidden = not(ostyle.charHidden)
> > else
> >     msgbox "Style ""Masquer"" non trouvé", 64, "Masquer"
> > end if
> >
> > end sub
> >
> >
> > Si tu réponds, merci de penser à utiliser la fonction "répondre à 
> > tous" du
> > logiciel de courrier ou du webmail de façon que la liste reçoive la 
> > réponse.
> >
> > Cordialement
> > Pierre-Yves


--
Envoyez un mail à users+unsubscribe@fr.libreoffice.org pour savoir comment vous désinscrire
Les archives de la liste sont disponibles à http://listarchives.libreoffice.org/fr/users/
Tous les messages envoyés sur cette liste seront archivés publiquement et ne pourront pas être 
supprimés