Editer les champs insérés dans Writer en gardant le formatage du texte [Résolu]

[Solaris]

Bonjour,

Je souhaiterais savoir comment faire pour enlever le lien des champs afin que je puisse les modifier et transmette mes documents sans les champs.
J’ai enregistré un petite macro qui me permet de faire ctrl+c et ctrl+maj+v et choisir texte non formaté.

Mon problème est que si je sélectionne tout mon texte je perds le “gras” et le “souligné”.

Mon idée serait (mais je ne sais pas le faire) d’arriver à sélectionner tous les champs du document Writer (et après je rajoute macro enregistrée).

Vous remerciant par avance pour vos réponses.

Bien cordialement

[PYS]

Bonjour

Hors macro, cela peut en effet être fastidieux… La macro suivante parcourt les champs du document et les remplace par leur contenu. Leur mise en forme (ainsi que celle du reste du texte naturellement) est préservée (police, taille…).

sub convertirChampEnTexte

dim collChamps as object, unChamp as Object

collChamps = thiscomponent.TextFields.createEnumeration()

do while collChamps.hasMoreElements()
	unChamp = collChamps.nextElement()
	unChamp.Anchor.setString(unChamp.Content)
loop

end sub 

Cordialement

[Solaris]

Un grand merci ! Cela fonctionne parfaitement !

Merci beaucoup et bon WE !