Skip to main content

How to convert comments to footnotes or endnotes in Microsoft Word?

Author: Siluvia Last Modified: 2024-08-29

Supposing there are multiple comments in your Word document, how can you convert all these comments to footnotes or endnotes at the same time? This article provides VBA methods to achieve it.

Convert comments to footnotes or endnotes with VBA code

Convert comments to footnotes or endnotes with VBA code

The below VBA codes can help you quickly convert all comments in current document to footnotes or endnotes. Please do as follows.

1. Open the document contains comments you will convert to footnotes or endnotes, press the Alt + F11 keys to open the Microsoft Visual Basic for Applications window.

2. In the Microsoft Visual Basic for Applications window, click Insert > Module. Then copy below VBA code into the Module window.

VBA window with a module inserted

VBA code: Convert comments to footnotes:

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

VBA code: Convert comments to endnotes:

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. Press the F5 key to run the code.

Then all comments in current document are converted to footnotes or endnotes immediately based on the VBA code you applied.

Related articles:

Do More in Less Time with AI-Enhanced Kutools for Word

Kutools for Word isn't just a set of tools - it's a smart solution designed to boost your productivity. With AI-driven capabilities and the most essential features, Kutools helps you accomplish more in less time:

  • Summarize, rewrite, compose, and translate content instantly.
  • Proofread text in real-time with grammar, punctuation, and style suggestions as you write.
  • Rephrase and translate content while keeping layout, style, and structure untouched.
  • Translate your content into over 40 languages with ease, expanding your reach globally.
  • Receive instant help and intelligent insights based on your current document content.
  • Ask how to complete a task - like removing section breaks - and the AI will guide you or do it for you.
  • Redact sensitive or confidential information in seconds to ensure complete privacy.
  • All tools work seamlessly inside Word, always within reach.
  • Create, refine, translate, summarize and secure documents effortlessly.
  • Improve grammar, clarity, and tone as you write in real time.
  • Rephrase and translate content with no layout or formatting changes.
  • Ask how to complete a task - like removing section breaks - and the AI will guide you or do it for you.
  • All tools work seamlessly inside Word, always within reach.
Learn more about Kutools for Word Download Now
Kutools for Word features

Best Office Productivity Tools

Kutools for Word - Elevate Your Word Experience with Over 100 Remarkable Features!

🤖 Kutools AI Features: AI Assistant / Real-Time Assistant / Super Polish (Preserve Format) / Super Translate (Preserve Format) / AI Redaction / AI Proofread...

📘 Document Mastery: Split Pages / Merge Documents / Export Selection in Various Formats (PDF/TXT/DOC/HTML...) / Batch Convert to PDF...

✏ Contents Editing: Batch Find and Replace across Multiple Files / Resize All Pictures / Transpose Table Rows and Columns / Convert Table to Text...

🧹 Effortless Clean: Sweap away Extra Spaces / Section Breaks / Text Boxes / Hyperlinks / For more removing tools, head to the Remove group...

➕ Creative Inserts: Insert Thousand Separators / Check Boxes / Radio Buttons / QR Code / Barcode / Multiple Pictures / Discover more in the Insert group...

🔍 Precision Selections: Pinpoint Specific Pages / Tables / Shapes / Heading Paragraphs / Enhance navigation with more Select features...

⭐ Star Enhancements: Navigate to Any Location / Auto-Insert Repetitive Text / Toggle Between Document Windows / 11 Conversion Tools...

🌍 Supports 40+ Languages: Use Kutools in your preferred language – supports English, Spanish, German, French, Chinese, and 40+ others!

Kutools and Kutools Plus tabs on the Word RibbonKutools and Kutools Plus tabs on the Word Ribbon
👉 Want to try these features? Download Kutools for Word now! 🚀
 

Best Office Productivity Tools

Kutools for Word - 100+ Tools for Word

Free Download Buy Now Learn More about Kutools