【ワードマクロ】校閲者のコメントの色を変更:自動化が最強かも

ワードマクロ_校閲者の文字色変更_アイキャッチ ワードマクロで効率化する

ワードマクロで、校閲者のコメントの色を変更するVBAコードをご紹介します。

複数ページの一括処理が可能です。

このページのマクロコードは、コピペで使えます。
ぜひお試しください!

校閲者のコメントの色を変更

以下のマクロを実行すると、変更履歴の校閲者のコメントの色を変更します。

Sub 全ての校閲コメントの文字色を変更()

  Dim TargetCom As Comment
 
  For Each TargetCom In ActiveDocument.Comments
    
    '文字色を変更
    TargetCom.Range.Font.ColorIndex = wdBlue
    
  Next
 
End Sub

 

マクロ実行後

ページ内にある校閲コメントの文字色を、黒→青 に変更しました。

複数ページの処理が一括で可能です。

校閲者のコメントの色を変更(校閲者別)

以下のマクロを実行すると、校閲者ごとに文字色を設定します。

Sub 校閲者別にコメントの文字色を変更()

  Dim TargetCom As Comment
 
  For Each TargetCom In ActiveDocument.Comments
  
    Select Case TargetCom.Author
    
        Case "kirinote"
            TargetCom.Range.Font.ColorIndex = wdGreen
    
        Case "member"
            TargetCom.Range.Font.ColorIndex = wdBlue
            
        Case "tanaka"
            TargetCom.Range.Font.ColorIndex = wdRed
    
    End Select

  Next
 
End Sub

 

マクロ実行後

校閲者別に文字色を自動で変更しました。

自分で好みの色に設定することができます。


https://kirinote.com/wordvba-commentname-touitu/