Skip to main content

How to list all comments to a new worksheet or workbook in Excel?

Author: Tech Support Last Modified: 2014-05-08

If you have workbook with too many comments in it, and you want to list all comments to a new worksheet or workbook for reviewing all comments, how can ou do? The following methods can help you quickly list all comments of a worksheet / workbook to a new worksheet or workbook in Excel.

List all comments to a new worksheet with VBA code

List all comments to a new worksheet or workbook with Kutools for Excel


arrow blue right bubble List all comments to a new worksheet with VBA code

The following VBA code will list all comments to a new worksheet in current workbook. In the new worksheet, it will list all comments of the whole workbook in a list with the sheet name, cell address, comment contents and cell name. Please use this method as follows:

1. Click Developer > Visual Basic, it displays the Microsoft Visual Basic for applications window. And click Insert > Module, and then input the following VBA codes in the Module.

VBA: lists all comments in a new worksheet.

Sub ShowCommentsAllSheets()
'Update 20140508
Dim commrange As Range
Dim rng As Range
Dim ws As Worksheet
Dim newWs As Worksheet
Set newWs = Application.Worksheets.Add
newWs.Range("A1").Resize(1, 4).Value = Array("Sheet", "Address", "Value", "Comment")
Application.ScreenUpdating = False
On Error Resume Next
For Each ws In Application.ActiveWorkbook.Worksheets
    Set commrange = ws.Cells.SpecialCells(xlCellTypeComments)
    If Not commrange Is Nothing Then
        i = newWs.Cells(Rows.Count, 1).End(xlUp).Row
        For Each rng In commrange
            i = i + 1
            newWs.Cells(i, 1).Resize(1, 4).Value = Array(ws.Name, rng.Address, rng.Value, rng.Comment.Text)
        Next
    End If
    Set commrange = Nothing
Next
newWs.Cells.WrapText = False
Application.ScreenUpdating = True
End Sub

2. Then click doc-list-comments-1 button to run the code, and you will get a new worksheet with all the comments in the current workbook. See screenshot:

doc-list-comments-2


arrow blue right bubble List all comments to a new worksheet or workbook with one click

With the Create Comment List of Kutools for Excel, you can quickly list all comments to a new worksheet or a new workbook.

Kutools for Excel: with more than 300 handy Excel add-ins, free to try with no limitation in 30 days. Get it Now.

1. If you have installed Kutools for Excel, click Kutools > More > Create Comment List, see screenshot:

doc-list-comments-3-3

2. In the Create Comment List dialog box:

  • Select the scope that you want to list the comment, you can choose Active sheet or All sheets.
  • Then specify the location that you want to put the comments list, you can list the comments in a new workbook or a new sheet, see screenshot:

doc-list-comments-4-4

3. And then click Createbutton. A new worksheet will be added to list all the active worksheet comments with its attributes such as sheet name, cell references, row and column. See screenshot:

For more detailed information about Create Comment List, please visit Create Comment List feature description.


Related articles:

Best Office Productivity Tools

ūü§Ė Kutools AI Aide: Revolutionize data analysis based on: Intelligent Execution   |  Generate Code  |  Create Custom Formulas  |  Analyze Data and Generate Charts  |  Invoke Kutools Functions‚Ķ
Popular Features: Find, Highlight or Identify Duplicates   |  Delete Blank Rows   |  Combine Columns or Cells without Losing Data   |   Round without Formula ...
Super Lookup: Multiple Criteria VLookup    Multiple Value VLookup  |   VLookup Across Multiple Sheets   |   Fuzzy Lookup ....
Advanced Drop-down List: Quickly Create Drop Down List   |  Dependent Drop Down List   |  Multi-select Drop Down List ....
Column Manager: Add a Specific Number of Columns  |  Move Columns  |  Toggle Visibility Status of Hidden Columns  |  Compare Ranges & Columns ...
Featured Features: Grid Focus   |  Design View   |   Big Formula Bar    Workbook & Sheet Manager   |  Resource Library (Auto Text)   |  Date Picker   |  Combine Worksheets   |  Encrypt/Decrypt Cells    Send Emails by List   |  Super Filter   |   Special Filter (filter bold/italic/strikethrough...) ...
Top 15 Toolsets12 Text Tools (Add Text, Remove Characters, ...)   |   50+ Chart Types (Gantt Chart, ...)   |   40+ Practical Formulas (Calculate age based on birthday, ...)   |   19 Insertion Tools (Insert QR Code, Insert Picture from Path, ...)   |   12 Conversion Tools (Numbers to Words, Currency Conversion, ...)   |   7 Merge & Split Tools (Advanced Combine Rows, Split Cells, ...)   |   ... and more

Supercharge Your Excel Skills with Kutools for Excel, and Experience Efficiency Like Never Before. Kutools for Excel Offers Over 300 Advanced Features to Boost Productivity and Save Time.  Click Here to Get The Feature You Need The Most...

Description


Office Tab Brings Tabbed interface to Office, and Make Your Work Much Easier

  • Enable tabbed editing and reading in Word, Excel, PowerPoint, Publisher, Access, Visio and Project.
  • Open and create multiple documents in new tabs of the same window, rather than in new windows.
  • Increases your productivity by 50%, and reduces hundreds of mouse clicks for you every day!
Comments (8)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
In the Create Comment List dialog, select the scope you want to list the comment, Active sheet or All sheets, then choose to place the comments in a new workbook or a new sheet of current workbook https://www.myloweslife.us/
This comment was minimized by the moderator on the site
Ahoj lidi. Jmenuji se Helena Karas z Praha 8. V pondel√≠ 07/01/19 dostal jsem √ļver ve v√ĹŇ°i 15.000.000 Kc od Peter Krajcovic za nemovitost v Praze 2. Spr√°vn√Ĺ e-mail pana Krajcovic je . Jeho √ļver je 100% garantov√°n. Kontaktujte jej, pokud st√°le hled√°te pujcku.
This comment was minimized by the moderator on the site
Ahoj lidi. Jmenuji se Helena Karas z Praha 8. V pondel√≠ 07/01/19 dostal jsem √ļver ve v√ĹŇ°i 15.000.000 Kc od Peter Krajcovic za nemovitost v Praze 2. Spr√°vn√Ĺ e-mail pana Krajcovic je . Jeho √ļver je 100% garantov√°n. Kontaktujte jej, pokud st√°le hled√°te pujcku.
This comment was minimized by the moderator on the site
But what if you are just commencing? Anyone could have to investigate on particular topic,
anyone start writing on out. This data was
required to rank web web pages

Almillat
Maninerd
hitscorner
maniwebify
This comment was minimized by the moderator on the site
I found it useful to add the following line after line 8 in the VBA code; it renames the sheet to the comments and the date created.

ActiveSheet.Name = "Comments " & Format(Now(), "DD-MMM-YY")
This comment was minimized by the moderator on the site
Oh, and one more thing. Each time I hit "Run", it opens a New Sheet with the list of comments. How can I make it add to the existing sheet without duplicating teh entries then? Thanks :)
This comment was minimized by the moderator on the site
Thank you for the VBA Code! This really helps. Is there a way in which I can see all new comments or responded to comments in the sheet in realtime? It only updates each time the workbook is opened. But not while I am working in it.
Best regards,
Loki
This comment was minimized by the moderator on the site
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
Rate this post:
0   Characters
Suggested Locations