Re: [fr-users] MAcro

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