Zum Hauptinhalt springen

So ändern Sie den im Word-Kommentar angezeigten Autorennamen

Author: Siluvia Last Modified: 2025-05-28

Dieser Artikel behandelt, wie Sie den Standard-Autorennamen für Kommentare in Word ändern können sowie das Aktualisieren des Autorennamens bei bestehenden Kommentaren in einem Dokument. Dies können Sie entweder über die integrierten Einstellungen von Word oder mit einem VBA-Makro tun.

Ändern Sie den Standard-Autorennamen für neue Kommentare

Ändern Sie den Namen des Autors bei bestehenden Kommentaren in einem Dokument

Ändern Sie den Standard-Autorennamen für neue Kommentare

Wenn Sie möchten, dass neue Kommentare einen anderen Autorennamen anzeigen, müssen Sie den Benutzernamen in den Word-Optionen-Einstellungen ändern.

  1. Öffnen Sie ein Word-Dokument und klicken Sie dann auf "Datei" > "Optionen".
  2. Gehen Sie im Fenster "Word-Optionen" zum Reiter "Allgemein".
  3. Ändern Sie den Namen im Feld "Benutzername".
  4. Klicken Sie auf "OK", um die Änderung zu speichern.
    User name box in Word Options

Jetzt wird jeder neue Kommentar, den Sie einfügen, den aktualisierten Benutzernamen anzeigen.

Ändern Sie den Namen des Autors bei bestehenden Kommentaren in einem Dokument

Wenn Sie ein Dokument mit vielen Kommentaren haben und alle Autorennamen auf einmal aktualisieren müssen, können Sie dies schnell mit einem VBA-Makro tun.

  1. Wählen Sie den Bereich aus, der die Kommentare enthält, die Sie ändern möchten, oder drücken Sie "Strg + A", um das gesamte Dokument auszuwählen.
  2. Drücken Sie "Alt + F11", um das Microsoft Visual Basic for Applications-Fenster zu öffnen.
  3. Klicken Sie im VBA-Editor auf "Einfügen" > "Modul". Fügen Sie dann den folgenden VBA-Code in das Modulfenster ein: 
    Sub ChangeCommentAuthor()
'Updated by ExtendOffice 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
  4. Drücken Sie "F5", um das Makro auszuführen. Geben Sie im erscheinenden Dialogfeld den neuen Autorennamen ein und klicken Sie auf "OK".
    Comments Author Name dialog box
  5. Geben Sie im nächsten Dialogfeld die neuen Initialen ein und klicken Sie auf "OK".
    Comments initials dialog box

Die Autorennamen aller Kommentare im ausgewählten Bereich wurden nun aktualisiert.

Comments’ author names are changed

Beste Büroproduktivitätswerkzeuge

Kutools für Word - Verbessern Sie Ihr Word-Erlebnis mit über 100 bemerkenswerten Funktionen!

🤖 Kutools AI-Funktionen: KI-Assistent / Echtzeit-Assistent / Super Polieren (Format beibehalten) / Super Übersetzen (Format beibehalten) / KI-Redaktion / KI Korrekturlesen...

📘 Dokumentenbeherrschung: Seiten teilen / Dokumente zusammenführen / Auswahl in verschiedenen Formaten exportieren (PDF/TXT/DOC/HTML...) / Stapelweise in PDF konvertieren...

✏ Inhaltsbearbeitung: Stapelweise Suchen und Ersetzen in mehreren Dateien / Alle Bilder skalieren / Zeilen und Spalten der Tabelle transponieren / Tabelle in Text umwandeln...

🧹 Müheloses Reinigen: Zusätzliche Leerzeichen entfernen / Abschnittsumbrüche / Textfelder / Hyperlinks / Für weitere Entfernungstools gehen Sie zur Entfernen-Gruppe...

➕ Kreative Einfügungen: Tausendertrennzeichen einfügen / Kontrollkästchen / Optionsfelder / QR-Code / Barcode / Mehrere Bilder / Entdecken Sie mehr in der Einfügen-Gruppe...

🔍 Präzise Auswahlen: Bestimmte Seiten / Tabellen / Formen / Überschriftenabsätze / Verbessern Sie die Navigation mit mehr Auswahlfunktionen ...

⭐ Sterneverbesserungen: Zu jedem Standort navigieren / Automatisches Einfügen von wiederholtem Text / Wechsel zwischen Dokumentfenstern /11 Konvertierungswerkzeuge...

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Möchten Sie diese Funktionen ausprobieren? Laden Sie Kutools für Word jetzt herunter! 🚀
 

Beste Büroproduktivitätswerkzeuge

Kutools für Word - 100+ Werkzeuge für Word

Kostenloser Download Jetzt kaufen Erfahren Sie mehr über Kutools