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

ワードマクロで、校閲者の名前を変更する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

マクロ実行後

校閲者の名前を一括変更しました。

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

・kirinote　→　kirinote 株式会社
・member　→　A社 ご担当者
・tanaka　→　B社 営業

 
 
この記事がお役に立ちますと幸いです。
 

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

...

kirinote.com

2022.09.23