How to sequentially number comments in Word 365

White, Robin P 20 Reputation points
2023-08-13T15:34:12.5433333+00:00

I want to number my review comments sequentially that I add to Word documents (as I have done for years in the previous Word program). How do you do this in Word 365?

Microsoft 365
Microsoft 365
Formerly Office 365, is a line of subscription services offered by Microsoft which adds to and includes the Microsoft Office product line.
4,205 questions
Word
Word
A family of Microsoft word processing software products for creating web, email, and print documents.
733 questions
Windows 10
Windows 10
A Microsoft operating system that runs on personal computers and tablets.
11,047 questions
Microsoft Teams
Microsoft Teams
A Microsoft customizable chat-based workspace.
9,473 questions
Word Management
Word Management
Word: A family of Microsoft word processing software products for creating web, email, and print documents.Management: The act or process of organizing, handling, directing or controlling something.
907 questions
0 comments
Accepted answer
  1. John Korchok 5,126 Reputation points
    2023-08-13T16:51:59.0166667+00:00
    1. In Word for Windows, choose File>Options>General and uncheck Enable modern comments.
    2. Then, on the Home tab, open the Styles Pane (Alt + Ctrl + Shift + s).
    3. Click on the Options button and set the Select styles to show dropdown to All styles. OK out.
    4. Back in the Style Pane, find the Comment Text style. Hover your mouse over the right end of the style name, then click on the down-pointing arrowhead that appears and choose Modify. The Modify Style dialog appears.
    5. Check the New Documents based on this template option, to make sure that future documents include numbered comments.
    6. Click on Format>Numbering and choose a numbering style for your comments. OK out.

    In testing here, this adds numbers to each new comment, but does not add numbers to old comments.

    1 person found this answer helpful.

1 additional answer

Sort by: Most helpful
Most helpful Newest Oldest
  1. Stefan Blom 2,131 Reputation points MVP
    2023-08-13T23:45:57.23+00:00

    Doug Robbins has created the macro below which can be used to add numbering even to modern comments. You can run the macro multiple times and in fact it must be run after you have added more comments to a document, so that the comments renumber properly. 

    Sub NumberComments()
'Created by Doug Robbins, MVP
Dim i As Long

Dim rngComment As Range

With ActiveDocument

    For i = 1 To .Comments.Count

        Set rngComment = .Comments(i).Range
        With rngComment
            If Left(.Text, 7) = "Comment" Then
                .Text = "Comment " & i & " " & Mid(.Text, InStr(.Text, "-"))

            Else

                .Text = "Comment " & i & " - " & .Text

            End If

        End With

    Next i

End With
End Sub
    0 comments