Cette vidéo vous montre comment numéroter automatiquement les paragraphes d’une thèse.
Nous utilisons une macro dont voici le contenu :
Sub MetLesNumeros() Dim Parag As Paragraph For Each Parag In ActiveDocument.Paragraphs If Parag.Style = "Normal" And Parag.Range.Characters.Count > 1 Then Parag.Range.Select Selection.Style = ActiveDocument.Styles("Liste à numéros") End If Next Parag ActiveDocument.Range(Start:=0, End:=0).Select End Sub