user_mobilelogo

Pour tout connaître sur Word
Nouvelle version !

600 pages !

9,80 € 

En savoir plus.

 Cette macro parcourt tout le document et donne par message le style du premier mot de chaque paragraphe.

Sub BalaieParagraphe()
'macro écrite par Geo
Dim Paragraphe As Paragraph
For Each Paragraphe In ActiveDocument.Paragraphs
Set mot = Paragraphe.Range.Words(1)
MsgBox mot.Style
Next
End Sub

Statistiques

Aujourd'hui156
Hier2243
Cette semaine9475
Ce mois52135
Total depuis 200413083062

4
visiteurs actuellement en ligne

25 juin 2021