Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

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 de fichier 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 en notes de fin. S'il vous plaît faire comme suit.

1. Ouvrez le document contient des commentaires que vous allez convertir en notes de bas de page ou notes de fin, appuyez sur la 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 ci-dessous dans la fenêtre du module.

Code VBA: Convertir les commentaires en notes de bas de page:

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

Code VBA: Convertir les commentaires en notes de fin:

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 dans le document en cours sont convertis en notes de bas de page ou en notes de fin immédiatement en fonction du code VBA que vous avez appliqué.


Articles Liés:



Outils de productivité Word recommandés

Kutools For Word - Plus de fonctionnalités avancées 100 pour Word, économisez votre% de temps 50

  • Des opérations compliquées et répétées peuvent être effectuées en une seconde.
  • Insérez plusieurs images sur des dossiers dans un document Word à la fois.
  • Fusionner et combiner plusieurs fichiers Word sur plusieurs dossiers en un seul avec votre ordre souhaité.
  • Divisez le document actuel en documents distincts en fonction de l'en-tête, du saut de section ou d'un autre critère.
  • Convertir des fichiers entre Doc et Docx, Docx et PDF, une collection d'outils pour les conversions et la sélection courantes, etc.
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.