Date: prev next · Thread: first prev next last
2015 Archives by date, by thread · List index


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

Context


Privacy Policy | Impressum (Legal Info) | Copyright information: Unless otherwise specified, all text and images on this website are licensed under the Creative Commons Attribution-Share Alike 3.0 License. This does not include the source code of LibreOffice, which is licensed under the Mozilla Public License (MPLv2). "LibreOffice" and "The Document Foundation" are registered trademarks of their corresponding registered owners or are in actual use as trademarks in one or more countries. Their respective logos and icons are also subject to international copyright laws. Use thereof is explained in our trademark policy.