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


Bonjour à tous,
N'ayant pas eu de réponse à mon dernier mail, je me demande si vous l'avez reçu (je suis nouveau sur cette liste...)
Merci d'avance

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

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.