Bonjour,
J'ai besoin de faire une macro me permettant de parcourir l'ensemble d'un document puis, en fonction du style du paragraphe courant (Heading1, ...), de lui appliquer certaines modifications. J'ai trouvé dans la FAQ le code nécessaire pour le parcours des paragraphes, mais je n'arrive pas à trouver d'informations sur les styles.
Est-ce que quelqu'un aurait une bonne documentation à me proposer, ou alors saurait comment procéder ?
Merci d'avance
P.S: le code que j'utilise:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Sub Parcours() Set myContenu = ActiveDocument.Content For Each Cible In ActiveDocument.Paragraphs Cible.Range.Select If Cible.Style = wdStyleHeading1 Then ' Marche pas! MsgBox "Style Head1 " + Cible.Range.Words(1) End If Next Cible End Sub
Partager