Wie ändert man alle Kommentarautorennamen in Excel?

Wenn Sie Kommentare in ein Arbeitsblatt einfügen, wird der Name des Kommentarautors automatisch in den Kommentar eingefügt, gefolgt von einem Doppelpunkt. Manchmal möchten Sie vielleicht den Namen des Kommentarautors ändern. Wie können Sie das tun? Sie können den Namen des Kommentarautors in Excel mit den folgenden Methoden ändern.

Ändern Sie den Standardautorennamen für alle neuen Kommentare durch Konfigurieren der Excel-Optionen

Schnelles Ändern des Autorennamens aller vorhandenen Kommentare in aktiven oder allen Blättern mit Kutools für Excel

Ändern Sie den Autorennamen aller vorhandenen Kommentare im gesamten Arbeitsbuch mit VBA-Code

Ändern Sie den Standardautorennamen für alle neuen Kommentare durch Konfigurieren der Excel-Optionen

Sie können den Excel-Benutzernamen ändern, um den Autorennamen aller neuen Kommentare zu ändern, die Sie einfügen werden.

1. Klicken Sie auf Datei > Optionen in Excel 2010/2013/2016, oder Sie können auf die Office- Schaltfläche > Excel-Optionen > Allgemein in Excel 2007 klicken.

2. Im Dialogfeld Excel-Optionen klicken Sie auf Allgemein in der linken Leiste, dann scrollen Sie zum Abschnitt „Personalisieren Sie Ihre Kopie von Microsoft Office“ im rechten Bereich und ersetzen Sie den alten Benutzernamen durch den neuen, den Sie benötigen. Klicken Sie abschließend auf die Schaltfläche OK. Siehe Screenshot:

Ab jetzt wird beim Einfügen neuer Kommentare in Ihr Arbeitsblatt der Autorenname der sein, den Sie oben angegeben haben. Der Autorenname der alten Kommentare bleibt jedoch unverändert.

Einfach den Autorennamen aller vorhandenen Kommentare mit einem neuen Namen mit Kutools für Excel finden und ersetzen

Neben der oben genannten Methode empfehle ich Ihnen hier das Hilfsprogramm „Benutzernamen in Kommentaren entfernen/hinzufügen“ von Kutools für Excel. Mit diesem Hilfsprogramm können Sie den Autorennamen aller vorhandenen Kommentare nicht nur im aktiven Blatt, sondern auch im gesamten Arbeitsbuch leicht in den neuen Namen ändern, den Sie benötigen.

1. Wechseln Sie zum Arbeitsblatt, in dem Sie den Autorennamen aller Kommentare ändern möchten, und klicken Sie auf Kutools > Mehr > Benutzernamen in Kommentaren entfernen/hinzufügen. Siehe Screenshot:

2. Im Dialogfeld „Benutzernamen in Kommentaren entfernen/hinzufügen“ müssen Sie wie folgt konfigurieren:

Zuerst den Autorennamen aus allen Kommentaren im angegebenen Bereich entfernen.

• (1) In der Dropdown-Liste Bereich, wenn Sie die Autorennamen nur im aktuellen Blatt ändern möchten, wählen Sie bitte die Option Aktuelles Arbeitsblatt. Um die Autorennamen im gesamten Arbeitsbuch zu ändern, wählen Sie bitte die Option Alle Arbeitsblätter.
• (2) Wählen Sie die Option Benutzernamen aus Kommentaren entfernen.
• (3) Klicken Sie auf die Schaltfläche Anwenden.
• (4) Klicken Sie im erscheinenden Dialogfeld auf die Schaltfläche OK.

Dann fügen Sie den neuen Autorennamen zu allen Kommentaren im angegebenen Bereich hinzu.

• (1) Geben Sie den neuen Autorennamen der Kommentare in das Benutzername Feld ein und wählen Sie dann die Option Benutzernamen zu Kommentaren hinzufügen;
• (2) Klicken Sie auf die Schaltfläche Anwenden;
• (3) Klicken Sie im erscheinenden Dialogfeld auf die Schaltfläche OK;
• (4) Klicken Sie auf die Schaltfläche Schließen, um das Dialogfeld zu schließen.

Verwenden Sie VBA-Code, um alle negativen Zahlen eines Bereichs in positive umzuwandeln

Wenn Sie den Autorennamen aller vorhandenen Kommentare im gesamten Arbeitsbuch ändern möchten, hilft Ihnen der folgende VBA-Code dabei:

1. Drücken Sie gleichzeitig die Tasten Alt + F11, um Microsoft Visual Basic for Applications zu öffnen. Und im Fenster Microsoft Visual Basic for Applications klicken Sie auf Einfügen > Modul, dann kopieren und fügen Sie den folgenden Code in das Modulfenster ein:

VBA-Code: Ändern Sie den Autorennamen aller vorhandenen Kommentare im gesamten Arbeitsbuch

Sub ChangeCommentName()
'Updateby20140509
Dim xWs As Worksheet
Dim xComment As Comment
Dim oldName As String
Dim newName As String
xTitleId = "KutoolsforExcel"
oldName = InputBox("Old Name", xTitleId, Application.UserName)
newName = InputBox("New Name", xTitleId, "")
For Each xWs In Application.ActiveWorkbook.Worksheets
    For Each xComment In xWs.Comments
        xComment.Text (Replace(xComment.Text, oldName, newName))
    Next
Next
End Sub

2. Drücken Sie die Taste F5, um den Code auszuführen, dann erscheint ein KutoolsforExcel -Dialogfeld mit dem alten Kommentarautorennamen, der im Textfeld angezeigt wird, bitte klicken Sie auf die Schaltfläche OK. Siehe Screenshot:

3. Dann erscheint ein weiteres KutoolsforExcel-Dialogfeld, geben Sie bitte den neuen Autorennamen der Kommentare, den Sie benötigen, in das Textfeld ein und klicken Sie dann auf die Schaltfläche OK. Siehe Screenshot:

Jetzt werden alle Autorennamen der vorhandenen Kommentare im gesamten Arbeitsbuch sofort in den neuen Namen geändert.

Hinweis: Diese Methode funktioniert nicht bei den neuen Kommentaren, die Sie einfügen.

Demo: Ändern Sie alle Kommentarautorennamen mit Kutools für Excel

Verwandte Artikel