Comment convertir des commentaires en notes de bas de page ou en notes de fin dans Microsoft Word?

En supposant qu'il y ait plusieurs commentaires dans votre document Word, comment pouvez-vous convertir tous ces commentaires en notes de bas de page ou en notes de fin en même temps? Cet article fournit des méthodes VBA pour y parvenir.

Convertir les commentaires en notes de bas de page ou en notes de fin avec le code VBA

Convertir les commentaires en notes de bas de page ou en notes de fin avec le code VBA

Les codes VBA ci-dessous peuvent vous aider à convertir rapidement tous les commentaires du document actuel en notes de bas de page ou de fin. Veuillez faire comme suit.

1. Ouvrez le document contenant des commentaires que vous allez convertir en notes de bas de page ou en notes de fin, appuyez sur le bouton autre + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. dans le Microsoft Visual Basic pour applications fenêtre, cliquez sur insérer > Module. Copiez ensuite le code VBA ci-dessous dans la fenêtre Module.

Sub ConvertCommentsToFootnotes()
    Dim xComm As Comment
    Dim xCommRange As Range
    Dim xDoc As Document
    Application.ScreenUpdating = False
    Set xDoc = ActiveDocument
    For Each xComm In xDoc.Comments
        Set xCommRange = xComm.Range
        xDoc.Footnotes.Add xComm.Scope, , xCommRange.Text
        xComm.Delete
    Next
    Application.ScreenUpdating = True
End Sub

Sub ConvertCommentsToEndnotes()
    Dim xComm As Comment
    Dim xCommRange As Range
    Dim xDoc As Document
    Application.ScreenUpdating = False
    Set xDoc = ActiveDocument
    For Each xComm In xDoc.Comments
        Set xCommRange = xComm.Range
        xDoc.Endnotes.Add xComm.Scope, , xCommRange.Text
        xComm.Delete
    Next
    Application.ScreenUpdating = True
End Sub

3. appuie sur le F5 clé pour exécuter le code.

Ensuite, tous les commentaires du document actuel sont immédiatement convertis en notes de bas de page ou en notes de fin en fonction du code VBA que vous avez appliqué.

Articles Liés:

• Comment ajouter une nouvelle page ou du texte après les notes de fin dans un document Word?
• Comment sélectionner toutes les notes de bas de page dans un document Word?

Outils de productivité Word recommandés