【ワードマクロ】校閲者の名前を一括変更：自動化で時短

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

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

校閲者の名前を変更

以下のWordVBAを実行すると、変更履歴の校閲者名を変更します。


Sub 校閲者の名称を変更()

  Dim TargetCom As Comment
 
  For Each TargetCom In ActiveDocument.Comments
  
    Select Case TargetCom.Author
    
        Case "kirinote"
            TargetCom.Author = "kirinote 株式会社"
    
        Case "member"
            TargetCom.Author = "A社 ご担当者"
            
        Case "tanaka"
            TargetCom.Author = "B社 営業"
    
    End Select

  Next
 
End Sub