If you have several comments in your Word documents, and you want to extract these comments from Word to Excel sheet, then you are in the right place. In this article, you learn a handy way to extract comments from a Word document into Excel using a VBA code.
Steps to Extract Comments from Word Document into Excel
In order to extract comments from a Word document into Excel using VBA codes, just follow the steps below.
Step 1: Open Word Document
Each cell of the Name column contains comments on the employee.
Read More: [Fixed!] Excel Comment Only Showing Arrow
- How to Make Flashcards in Excel
- How to Remove Comments in Excel
- How to Edit Comment in Excel
- How to Format Comments in Excel
Step 2: Create Comments
If you put your cursor on any name in the Name column, the comment on that name will pop up. Our goal is to extract each of these comments into an Excel sheet.
Read More: Creating and Editing Excel Comments to Cells
- How to Find Comments in Excel
- [Fixed!] Comments in Excel Far Away from Cell
- How to Reference Comments in Excel
- [Solved!] Comments Are Not Displaying Properly in Excel
Step 3: Open a New Module from Developer Tab
In your Word document, go to Developer tab >> Visual Basic >> Insert >> Module. A module window will appear.
If you don’t see the Developer tab in the ribbon, then follow the steps below to add the Developer tab to the ribbon.
- First, click on the File tab >> Options. A Word Options window will pop up.
- Under the Customize Ribbon section, select the Developer option, and finally, click on OK.
Read More: How to Filter Cells with Comments in Excel
- How to Extract Comments in Excel
- How to Add Floating Comment in Excel
- Anchoring Comment Boxes in Excel
- How to Reply to a Comment in Excel
Step 4: Enter VBA Code and Run
Copy the following VBA code and paste it into the module window. Then, click on the Run button.
Sub ExtractCommentsFromWordToExcel() 'Create in Word vba 'set a reference to the Excel object library Dim xAPP As Excel.Application Dim xWB As Excel.Workbook Dim j As Integer Set xAPP = CreateObject("Excel.Application") xAPP.Visible = True Set xWB = xAPP.Workbooks.Add ' create a new workbook With xWB.Worksheets(1) For j = 1 To ActiveDocument.Comments.Count .Cells(j, 1).Formula = ActiveDocument.Comments(j).Initial .Cells(j, 2).Formula = ActiveDocument.Comments(j).Range .Cells(j, 3).Formula = Format(ActiveDocument.Comments(j).Date, "dd/MM/yyyy") Next j End With Set xWB = Nothing Set xAPP = Nothing End Sub
- If the code doesn’t run, then you should go to the Tools tab under the Microsoft Visual Basic for Application Window. Then, click on the References. A References-Project dialog box will appear.
- Now, search for the Microsoft Excel 16.0 Object Library option, and select it. And then, click on OK.
Finally, after running the code properly, an Excel workbook will appear with the following results.
Read More: How to Add Comment in Excel
- How to Add Comment in Excel Formula
- How to Copy Comments in Excel
- How to Insert Picture in Excel Comment
- Vlookup to Copy Comments in Excel
Download Practice Workbook
You can download the following practice workbook that we have used to prepare this article
In this tutorial, I have discussed a handy way to extract comments from a Word document into Excel using a VBA code. I hope you found this article helpful. Please, drop comments, suggestions, or queries if you have any in the comment section below.