Discussion :

[centaurus45]

Bonjour,

J'ai écris une autobiogaphie et dans celle-ci ,il y a des paragraphes qui relatent des informations officielles et des faits divers qui sont arrivés au cours de ma vie.

Or ces lignes de texte n'apparaissent pas dans le logiciel d'auto édition car elles sont prises en commentaires et on me demande de les transformer en texte brut ??

Je ne sais pas du tout quoi faire sur tout que mon livre fait 274 pages et il y a plusieurs paragraphes de ce fait qui sont pris en commentaires

Vous me serez d'une grande aide et je vous remercie d'avance

[E KERGRESSE]

Bonjour,

Si vous êtes familiarisé avec les macros, faites une copie (dans tous les cas) de votre document en .docm (supportant les macros).

Et testez ce code, il ne restera que le texte brut.

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
17
18
Sub TestSuppressionCommentaires()
 
Dim DocEncours As Document
Dim I As Integer
 
    Set DocEncours = ActiveDocument
 
    With DocEncours.Range
         If .Comments.Count > 0 Then
             For I = .Comments.Count To 1 Step -1
                 .Comments(I).DeleteRecursively
             Next I
         End If
    End With
    Set DocEncours = Nothing
 
 
End Sub