passage entre guillemets

[Francis]

Bonjour
Je suis nouveau en VBA et je demande votre aide.
Je voudrais dans un texte sous Word mettre en gras tous les passages entre guillemets et accessoirements les colorer.
Merci d’avance.
Francis

 

[Lord Nelson]

Salut Francis,

Sans être un spécialiste des macros Word, j'ai essayé de répondre à ta question avec ceci :

Sub ModifTexte()
Dim OK As Boolean
Selection.HomeKey Unit:=wdStory
Do
Selection.Find.ClearFormatting
Selection.Find.MatchWildcards = True
OK = Selection.Find.Execute(FindText:="«*»", Forward:=True)
If OK = True Then
Selection.Font.Bold = True
Selection.Font.Color = wdColorBlue
Else
'MsgBox "Recherche terminée"
Exit Do
End If
Loop
Selection.HomeKey Unit:=wdStory
End Sub

Si cela peut t'aider, j'en serais heureux.
A+
Horatio

 

[Francis]

bonsoir Horatio
je vous remercie pour votre aide, c'est parfait. c'est exactement ce que je voulais. J'y travaillais depuis deux jours dessus,et je n'en voyais pas la fin.
J'avais un dossier d'une cinquantaine de page . Grace à votre aide , en un clic c'est terminé.
Merci encore
Francis

 

[bern_schneider86]

Re : Re: passage entre guillemets

merci horatio pour les guillemts, moi j'ai un autre problème.
j'ai du texte comme ceci:
pour les référencement d'articles

{{est| se trouve être} {vraiment| très| vivement| assez| fort| bien} {simple| facile| rapide| pas compliqué| commode| aisé} |n'{est| se trouve être} pas si {difficile| complexe| compliqué| délicat| pénible}.

et moi je veux vérifier si les accolades sont du même ombre (ouvrant = fermant), donc j'ai suivi comme pour les guillemts de mettre en gras les {*} mais le problème c'est que il met ainsi les {{*} en gras.
j'aimerais avoir des idées comment vérifier les accolades imbriqués comme sur l'exemple, le code met en gras simplement ----{est| se trouve être}---- mais pas -----{{est| se trouve être}------
A+
Bern_Schneider!!!