Comment convertir des commentaires en notes de bas de page ou en notes de fin dans Microsoft Word ?
Author: Siluvia Last Modified: 2025-05-27
Supposons 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 des commentaires en notes de bas de page ou en notes de fin avec du code VBA
Convertir des commentaires en notes de bas de page ou en notes de fin avec du 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. Veuillez procéder comme suit.
1. Ouvrez le document contenant les commentaires que vous souhaitez convertir en notes de bas de page ou en notes de fin, puis appuyez sur les touches Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic for Applications.
2. Dans la fenêtre Microsoft Visual Basic for Applications, cliquez sur Insérer > Module. Ensuite, copiez le code VBA ci-dessous dans la fenêtre Module.
Code VBA : Convertir des 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 des 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. Appuyez sur la touche F5 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 connexes :
Faites plus en moins de temps avec Kutools pour Word amélioré par l'IA
Kutools pour Word n'est pas seulement un ensemble d'outils - c'est une solution intelligente conçue pour augmenter votre productivité. Avec des fonctionnalités pilotées par l'IA et les fonctionnalités les plus essentielles, Kutools vous aide à accomplir plus en moins de temps :
- Résumez, réécrivez, composez et traduisez du contenu instantanément.
- Relisez le texte en temps réel avec des suggestions de grammaire, de ponctuation et de style pendant que vous écrivez.
- Reformulez et traduisez du contenu tout en conservant la mise en page, le style et la structure intacts.
- Traduisez votre contenu dans plus de 40 langues facilement, élargissant ainsi votre portée mondiale.
- Recevez une aide instantanée et des informations intelligentes basées sur le contenu de votre document actuel.
- Demandez comment effectuer une tâche - comme supprimer des sauts de section - et l'IA vous guidera ou le fera pour vous.
- Expurgez des informations sensibles ou confidentielles en quelques secondes pour assurer une confidentialité totale.
- Tous les outils fonctionnent de manière transparente dans Word, toujours à portée de main.
- Créez, affinez, traduisez, résumez et sécurisez des documents sans effort.
- Améliorez la grammaire, la clarté et le ton en temps réel pendant que vous écrivez.
- Reformulez et traduisez du contenu sans changer la mise en page ou la mise en forme.
- Demandez comment effectuer une tâche - comme supprimer des sauts de section - et l'IA vous guidera ou le fera pour vous.
- Tous les outils fonctionnent de manière transparente dans Word, toujours à portée de main.
En savoir plus sur Kutools for Word Télécharger maintenant
Meilleurs outils de productivité pour Office
Kutools pour Word - 100+ outils pour Word
