Bonjour à tous,
Avec le code suivant, j'ambitionne de transformer tous mes "gras" en balise HTML.
Mais comment étendre cette action à tout le texte du document, y compris les notes de bas de page ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 Set oRng = ActiveDocument.Range With oRng.Find .ClearFormatting .MatchWildcards = True .Format = True .Font.Bold = True While .Execute With oRng .InsertBefore "<b>" .InsertAfter "</b>" .Font.Bold = False .Collapse wdCollapseEnd End With Wend End With
Merci pour vos commentaires.
GS.
Partager