Direkt zum Inhalt

So ändern Sie den Autorennamen für einen Kommentar in Word

In diesem Artikel geht es darum, den Standardautorennamen für Kommentare oder den vorhandenen Autorennamen in einem Dokument in einen neuen zu ändern. Bitte versuchen Sie die folgenden zwei Methoden.

Ändern Sie den Autorennamen der Kommentare für die zukünftige Verwendung

Ändern Sie den Autorennamen der vorhandenen Kommentare eines Dokuments


Ändern Sie den Autorennamen der Kommentare für die zukünftige Verwendung

Wenn Sie den Autorennamen des Kommentars für die zukünftige Verwendung ändern möchten, ändern Sie bitte den Benutzernamen im Fenster Word-Optionen.

1. Klicken Sie in einem geöffneten Word-Dokument auf Reichen Sie das > Optionen. In dem Word-Optionen Stellen Sie sicher, dass Sie sich im Fenster befinden Allgemeines Ändern Sie auf der Registerkarte den Namen in der Benutzername Feld wie unten abgebildet Screenshot, und klicken Sie schließlich auf die OK .

Jetzt haben Sie den Standardbenutzernamen für Kommentare im Word-Dokument geändert.


Ändern Sie den Autorennamen der vorhandenen Kommentare eines Dokuments

Wenn Sie ein Dokument mit vielen Kommentaren erhalten haben und die Autorennamen aller Kommentare auf einen bestimmten ändern möchten, wird Ihnen der folgende VBA-Code einen Gefallen tun.

1. Wählen Sie den Bereich aus, der Kommentare enthält, oder wählen Sie das gesamte Dokument aus. Sie ändern die Autorennamen, indem Sie auf drücken Ctrl + A Tasten, drücken Sie die Andere + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.

2. In der Öffnung Microsoft Visual Basic für Applikationen Klicken Sie im Fenster Insert > Modul. Kopieren Sie dann den folgenden VBA-Code in das Modulfenster.

VBA-Code: Ändern Sie den Autorennamen des Dokuments der vorhandenen Kommentare

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. Drücken Sie die Taste F5 Schlüssel zum Ausführen des Codes. In der Eröffnung Kommentare Autorenname Geben Sie im Dialogfeld den neuen Autorennamen in das Textfeld ein und klicken Sie auf OK .

4. In der nächsten Öffnung Kommentare Initialen Geben Sie im Dialogfeld die gewünschten Initialen ein und klicken Sie auf OK .

Anschließend werden die Autorennamen aller Kommentare im ausgewählten Bereich sofort in den angegebenen Namen geändert (siehe Abbildung unten).

Beste Office-Produktivitätstools

Kutools for Word - Steigern Sie Ihr Word-Erlebnis mit Over 100 Bemerkenswerte Funktionen!

🤖 Kutools KI-Assistent: Verwandeln Sie Ihr Schreiben mit KI – Inhalte generieren  /  Text umschreiben  /  Dokumente zusammenfassen  /  Erkundigen Sie sich nach Informationen basierend auf Dokument, alles in Word

📘 Dokumentenbeherrschung: Seiten teilen  /  Dokumente zusammenführen  /  Auswahl in verschiedenen Formaten exportieren (PDF/TXT/DOC/HTML...)  /  Stapelkonvertierung in PDF  /  Seiten als Bilder exportieren  /  Drucken Sie mehrere Dateien gleichzeitig...

Inhaltsbearbeitung: Batch suchen und ersetzen über mehrere Dateien hinweg  /  Größe aller Bilder ändern  /  Vertauschen Sie Tabellenzeilen und -spalten  /  Tabelle in Text konvertieren...

🧹 Mühelose Reinigung: Wegfegen Zusätzliche Räume  /  Abschnittswechsel  /  Alle Header  /  Textfelder  /  Hyperlinks  / Weitere Entfernungswerkzeuge finden Sie auf unserer Gruppe entfernen...

Kreative Einsätze: Einfügen Tausend Trennzeichen  /  Kontrollkästchen  /  Radio Knöpfe  /  QR Code  /  Strichcode  /  Diagonale Linientabelle  /  Gleichungsbeschriftung  /  Bildunterschrift  /  Tabellenüberschrift  /  Mehrere Bilder  / Entdecken Sie mehr im Gruppe einfügen...

🔍 Präzise Auswahl: Punktgenau bestimmte Seiten  /  Tabellen  /  Formen  /  Überschriften von Absätzen  / Verbessern Sie die Navigation mit mehr Wählen Sie Funktionen aus...

Star-Verbesserungen: Navigieren Sie schnell zu jedem Ort  /  Sich wiederholenden Text automatisch einfügen  /  Wechseln Sie nahtlos zwischen Dokumentfenstern  /  11 Konvertierungstools...

👉 Möchten Sie diese Funktionen ausprobieren? Kutools für Word bietet a 60-Tage kostenlose Testversion, ohne Einschränkungen! 🚀
 
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