Skip to content

Instantly share code, notes, and snippets.

@gunta
Created January 28, 2023 18:29
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save gunta/bfbd721f469dad02fd7754de8136bcec to your computer and use it in GitHub Desktop.
Save gunta/bfbd721f469dad02fd7754de8136bcec to your computer and use it in GitHub Desktop.
Make text red and add comment
Sub MacroRED()
Selection.Font.Color = wdColorRed
ActiveDocument.Comments.Add Selection.Range, Selection.Text
ActiveWindow.View.ShowComments = True
Selection.GoTo wdGoToComment, wdGoToNext
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment