Written by Allen Wyatt (last updated October 5, 2024)
This tip applies to Word 2007, 2010, 2013, 2016, 2019, 2021, and Word in Microsoft 365
Word includes a powerful tool that allows you to add comments to your document. Since comments are designed for reviewers' annotations while developing a document, it is handy to know how to paste the text of a comment into your main document. This is done using editing techniques you are already familiar with. Follow these steps:
WordTips is your source for cost-effective Microsoft Word training. (Microsoft Word is the most popular word processing software in the world.) This tip (6036) applies to Microsoft Word 2007, 2010, 2013, 2016, 2019, 2021, and Word in Microsoft 365. You can find a version of this tip for the older menu interface of Word here: Pasting a Comment into Your Document.
Discover the Power of Microsoft Office This beginner-friendly guide reveals the expert tips and strategies you need to skyrocket your productivity and use Office 365 like a pro. Mastering software like Word, Excel, and PowerPoint is essential to be more efficient and advance your career. Simple lessons guide you through every step, providing the knowledge you need to get started. Check out Microsoft Office 365 For Beginners today!
Microsoft now calls "notes" what it used to call "comments." Some people don't like the modern, threaded notes. This tip ...
Discover MoreComments or notes are often added to documents to aid in their development. You can use regular editing techniques to ...
Discover MoreComments are a great way to share, well, comments with other people looking through your documents. If you want to print ...
Discover MoreFREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."
2024-10-07 09:50:00
Andrew
Here the macro I use to convert comments in bulk.
Sub CommentsToInline()
Const CommentShading = wdGray25
Const CommentColor = wdBlue
Dim OriginalNum As Long
Dim TrackingState As Boolean
Dim C As Comment
With ActiveDocument.Content
Application.UndoRecord.StartCustomRecord "CommentsToInline"
TrackingState = ActiveDocument.TrackRevisions
ActiveDocument.TrackRevisions = False
OriginalNum = .Comments.Count
For Each C In .Comments
With C.Scope
.Collapse wdCollapseEnd
.Text = "{{" & C.Author & ": }}"
With .Font
.Name = "Arial"
.Size = Round(0.8 * .Size)
.ColorIndex = CommentColor
.Bold = True
.Italic = False
.Underline = wdUnderlineNone
End With
.Collapse wdCollapseStart
.MoveStartUntil cset:="}"
.FormattedText = C.Range.FormattedText
.FormattedText.HighlightColorIndex = CommentShading
.FormattedText.Font.ColorIndex = CommentColor
End With
.Delete
Next C
ActiveDocument.TrackRevisions = TrackingState
Application.UndoRecord.EndCustomRecord
MsgBox OriginalNum - .Comments.Count & " comment(s) converted (" & OriginalNum & " remaining)."
End With
End Sub
Got a version of Word that uses the ribbon interface (Word 2007 or later)? This site is for you! If you use an earlier version of Word, visit our WordTips site focusing on the menu interface.
Visit the WordTips channel on YouTube
FREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."
Copyright © 2025 Sharon Parq Associates, Inc.
Comments