メインコンテンツへスキップ

Wordでコメントの作成者名を変更する方法

この記事では、コメントのデフォルトの作成者名を変更すること、またはドキュメント内の既存の作成者名を新しいものに変更することについて説明しています。 以下のXNUMXつの方法をお試しください。

将来使用するためにコメントの作成者名を変更する

ドキュメントの既存のコメントの作成者名を変更します


将来使用するためにコメントの作成者名を変更する

将来使用するためにコメントの作成者名を変更する場合は、[Wordのオプション]ウィンドウで[ユーザー名]を変更してください。

1.開いたWord文書で、をクリックします File > オプション。 の中に Wordのオプション ウィンドウ、あなたがに位置していることを確認してください タブで、名前を変更します ユーザー名 下のスクリーンショットのようなボックスをクリックし、最後に OK

これで、Word文書のコメントのデフォルトのユーザー名が変更されました。


ドキュメントの既存のコメントの作成者名を変更します

コメントの多いドキュメントを受け取り、すべてのコメントの作成者名を特定の名前に変更したい場合は、次のVBAコードを使用すると便利です。

1.コメントを含む範囲を選択するか、ドキュメント全体を選択して、を押して作成者名を変更します Ctrlキー + A キーを押して、 他の + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。

2.オープニングで アプリケーション向け Microsoft Visual Basic ウィンドウ、クリック インセット > モジュール。 次に、以下のVBAコードをモジュールウィンドウにコピーします。

VBAコード:ドキュメントの既存のコメントの作成者名を変更します

Sub ChangeCommentAuthor()
'Updated by EntendOffice 20181112
    Dim I As Long
    Dim xNewName As String
    Dim xShortName As String
    If Selection.Comments.Count = 0 Then
        MsgBox "No comments in your selection!", vbInformation, "KuTools for Word"
        Exit Sub
    End If
    xNewName = InputBox("New author name?", "KuTools for Word")
    xShortName = InputBox("New author initials?", "KuTools for Word")
    If xNewName = "" Or xShortName = "" Then
        MsgBox "The author name/initials can’t be empty.", vbInformation, "Kutools for Word"
        Exit Sub
    End If
    With Selection
        For I = 1 To .Comments.Count
            .Comments(I).Author = xNewName
            .Comments(I).Initial = xShortName
        Next I
    End With
End Sub

3。 プレス F5 コードを実行するためのキー。 オープニングで コメント作者名 ダイアログボックスで、新しい作成者名をテキストボックスに入力し、[ OK

4.次のオープニングで コメントのイニシャル ダイアログボックスで、必要に応じてイニシャルを入力し、 OK

次に、以下のスクリーンショットに示すように、選択した範囲内のすべてのコメントの作成者名が、指定した名前にすぐに変更されます。

最高のオフィス生産性向上ツール

Kutools for Word - Over で単語体験を向上させましょう 100 注目すべき機能!

🤖 Kutools AI アシスタント: AI であなたの文章を変革します - コンテンツを生成する  /  テキストを書き換える  /  文書を要約する  /  情報のお問い合わせ 文書に基づいて、すべて Word 内で

📘 ドキュメントマスタリー: 分割ページ  /  ドキュメントをマージする  /  選択内容をさまざまな形式でエクスポート (PDF/TXT/DOC/HTML...)  /  PDFへの一括変換  /  ページを画像としてエクスポート  /  複数のファイルを一度に印刷する...

コンテンツ編集: バッチ検索と置換 複数のファイルにわたる  /  すべての画像のサイズを変更する  /  テーブルの行と列を転置する  /  表をテキストに変換...

🧹 楽にお掃除:振り払って 余分なスペース  /  セクションブレーク  /  すべてのヘッダー  /  テキストボックス  /  ハイパーリンク  / その​​他の取り外しツールについては、当社の Web サイトをご覧ください。 グループを削除...

クリエイティブインサート:挿入 千の区切り文字  /  チェックボックス  /  ラジオボタン  /  QRコード  /  バーコード  /  斜線テーブル  /  方程式のキャプション  /  画像キャプション  /  テーブルキャプション  /  複数の写真  / 詳細については、 グループを挿入...

🔍 正確な選択: ピンポイント 特定のページ  /  テーブル  /  シェイプ  /  見出し段落  / ナビゲーションを強化する 他には? 機能の選択...

スターの強化: あらゆる場所に素早く移動  /  繰り返しのテキストを自動挿入  /  ドキュメントウィンドウをシームレスに切り替える  /  11 変換ツール...

👉 これらの機能を試してみませんか? Kutools for Wordは、 60日無料トライアル、制限なし! 🚀
 
Comments (32)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
Hi, thanks for this guide. However I'm stuck at the module step. What do you mean with pressing F5 keys? Can you show me? Thank you
This comment was minimized by the moderator on the site
Hi Carla,

After adding the VBA code, stay in the Microsoft Visual Basic for Applications window and press the F5 key on your keyboard to run the code.
This comment was minimized by the moderator on the site
Fantastic - many thanks!!!
Rated 5 out of 5
This comment was minimized by the moderator on the site
Thank you, is there a solution to change the picture of the author in the comments into an anonymous one?
This comment was minimized by the moderator on the site
Hi Niccolo,
Sorry can't help you with this problem.
This comment was minimized by the moderator on the site
Cool thanks!
This comment was minimized by the moderator on the site
Boas. No meu caso funcionou muito bem com os "comentarios", mas não alterou o nome de quem fez as "alterações" ao texto. Alguém consegue efectuar a alteração do autor para todos os tipos de marcações: comentarios, alterações, formatação...
This comment was minimized by the moderator on the site
Microsoft ist schon ein Schrott. Je neuer die Versionen sind, umso weniger findet man die Lösung. Wo ändere ich schlichtweg den Autor grundsätzlich. Bei mir wird nichts geändert und ich suche seit über 2 Stunden... einfach nur Schrott das UX von Microschrott
This comment was minimized by the moderator on the site
Excellent information in this post and also in the comments. Thank you everyone.
This comment was minimized by the moderator on the site
Great, worked very well ... thanks
This comment was minimized by the moderator on the site
FOR THOSE WHO WANNA CHANGE AUTHORS ONLY OF CERTAIN COMMENTSOpen your doc with an archiver (e.g. ZIP), go to word folder, find comments.xml file, extract, open with notepad, edit accordingly (ctrl+H to find and change current author and initials to the ones you desire), save, get the file back to word folder in the zip, et voila
This comment was minimized by the moderator on the site
Cette astuce ne fonctionne pas avec toutes les versions d'office
This comment was minimized by the moderator on the site
Bonjour
Cette macro fonctionne bien, mais pour anonymiser l'auteur des corrections dans un texte, il faudrait, en plus de l'auteur des commentaires, pouvoir changer le nom au niveau de marques de révision, et tel n'est pas le cas.
Auriez-vous une solution?
Merci d'avance.
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations