Modifier une police dans un doc. word

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Modifier une police dans un doc. word

VirginieGE

Bonjour à tous, j'ai un projet VB qui ouvre un doc. word et qui ensuite est censé mettre en bleu une chaîne de caractère s'il la trouve... Avec le code suivant :

Code :

Set MyRange = ActiveDocument.Content
MyRange.Find.Execute FindText:="ble ble ble", _
ReplaceWith:="bla bla bla", _
Replace:=wdReplaceAll

j'arrive à remplacer ble ble ble par bla bla bla, mais supposons que je souhaiterais que ble ble ble reste, mais s'affiche en bleu ?!?

Qqn aurait-il une idée ?!?

Publicité

VirginieGE

J'essaie avec le code suivant, mais il me dit que la méthode Replacement de l'objet Find a échoué....

Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
Selection.Find.Replacement.Font.Color = wdColorRed
With Selection.Find
.Replacement.ClearFormatting
.Replacement.Font.Color = wdColorRed
.text = "und"
.Replacement.text = "und"
.Forward = True
.Wrap = wdFindContinue
.Format = True
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll

FORUM HardWare.fr

Programmation

VB/VBA/VBS

Modifier une police dans un doc. word

Sujets relatifs
[PHP] Modif d'un document word : ça marche !	Transformer doc Word en image
Aide sur word et VBA	inserer une video en flash avec Word
HELP !! Traduire une Macro de WORD à EXCEL	Modifier programme, macro?
Fusion word depuis une Macro Excel	Modifier l'heure automatiquement sous windows
[JAVA] modifier le fond d un jpanel
Plus de sujets relatifs à : Modifier une police dans un doc. word

Page générée en 0.020 secondes