Bonjour

Cemoi Cemoi wrote
> Au final vide ça ne va pas il me faut des ............................. à
> la place des lettres. Je dois pouvoir remplacer le style1 par un style2
> qui
> me met que des ..............? Non?

Un style ne pourra pas remplacer du texte par un autre (les ...). On
peut bien sûr rechercher les paragraphes mis en forme par un style et
remplacer leur contenu par un autre texte.

Mais le plus simple me semble être de mettre la même couleur
pour l'arrière-plan et le texte. Dans l'exemple joint j'applique un
gris pour que la zone à remplir soit matérialisée.

option explicit

const sNomStyle = "Texte prof"

Sub PysChangerStyle
dim oDoc as object, oStyles as object, oStyle as object

oDoc = thiscomponent
oStyles = oDoc.styleFamilies.getByName("ParagraphStyles")

if oStyles.hasByName(sNomStyle) then
        oStyle = oStyles.getByName(sNomStyle)   
        with oStyle
                .CharColor = RGB(238,238,238) 
                .CharBackColor = RGB(238,238,238) 
        end with        
else
        msgbox "Style " & sNomStyle & " non trouvé", 64, "Modification pour
impression"
end if


End Sub


Cordialement




--
View this message in context: 
http://nabble.documentfoundation.org/masquer-un-style-a-l-impression-tp4146314p4148104.html
Sent from the Users mailing list archive at Nabble.com.

-- 
Envoyez un mail à [email protected] 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

Répondre à