Hoe wijzigt u de auteursnaam van alle opmerkingen in Excel?

Wanneer u opmerkingen in een werkblad invoegt, wordt automatisch de naam van de auteur van de opmerking gevolgd door een dubbele punt in de opmerking ingevoegd. Soms wilt u de naam van de auteur van de opmerking wijzigen. Hoe doet u dat? U kunt de naam van de auteur van de opmerking in Excel wijzigen met de volgende methoden.

Wijzig de standaardauteur van alle Nieuwe opmerking door Excel-opties in te stellen

Wijzig snel de auteursnaam van alle bestaande opmerkingen in het actieve of alle werkbladen met Kutools voor Excel

Wijzig de auteurnaam van alle bestaande opmerkingen in de hele werkmap met VBA-code

Wijzig de standaardauteursnaam van alle Nieuwe opmerking door Excel-opties te configureren

U kunt uw Excel-gebruikersnaam wijzigen om de auteursnaam van alle nieuwe opmerkingen die u invoegt, automatisch aan te passen.

1. Klik op Bestand > Opties in Excel 2010/2013/2016, of klik op de Office-knop > Excel-opties > Algemeen in Excel 2007.

2. In het dialoogvenster Excel-opties klikt u in de linkerbalk op Algemeen, scrolt u in het rechterdeelvenster naar het gedeelte Personaliseer uw exemplaar van Microsoft Office en vervangt u de oude Gebruikersnaam door de nieuwe die u nodig hebt. Klik ten slotte op de knop OK. Zie schermafbeelding:

Vanaf nu wordt bij het invoegen van een nieuwe opmerking in uw werkblad de auteursnaam gebruikt die u hierboven hebt opgegeven. De auteursnaam van bestaande opmerkingen blijft echter ongewijzigd.

Wijzig eenvoudig de auteursnaam van alle bestaande opmerkingen in een nieuwe met Kutools voor Excel

Naast de bovenstaande methode raad ik u de volgende functie aan: Auteur verwijderen/toevoegen in opmerking van Kutools voor Excel. Met deze functie wijzigt u eenvoudig de auteursnaam van alle bestaande opmerkingen naar de nieuwe naam die u nodig hebt – niet alleen op het actieve werkblad, maar in de gehele werkmap.

1. Ga naar het werkblad waarvan u de auteursnaam van alle opmerkingen wilt wijzigen en klik op Kutools > Meer > Auteur verwijderen/toevoegen in opmerking. Zie schermafbeelding:

2. In het dialoogvenster Auteur verwijderen/toevoegen in opmerking moet u het volgende configureren:

Verwijder eerst de auteursnaam uit alle opmerkingen in het actiebereik.

• (1) In de Bereik-keuzelijst: als u auteurnamen alleen in het huidige werkblad wilt wijzigen, selecteert u de optie Huidig werkblad. Wilt u auteurnamen in de hele werkmap wijzigen, selecteer dan de optie Alle werkbladen.
• (2) Kies de Verwijder Gebruikersnaam uit opmerkingen optie.
• (3) Klik op de Toepassen-knop.
• (4) Klik in het verschijnende dialoogvenster op de OKknop

Voeg daarna een nieuwe auteursnaam toe aan alle opmerkingen binnen het actiebereik.

• (1) Voer de nieuwe auteurnaam voor opmerkingen in het Gebruikersnaamvak in en kies vervolgens de Voeg Gebruikersnaam toe aan opmerkingenoptie;
• (2) Klik op de Toepassenknop;
• (3) Klik in het verschijnende dialoogvenster op de OKknop;
• (4) Klik op de Sluiten-knop om het dialoogvenster te sluiten.

Negatieve getallen in een bereik omzetten naar positieve met VBA-code

Als u de auteursnaam van alle bestaande opmerkingen in de gehele werkmap wilt wijzigen, helpt u de volgende VBA-code:

1. Druk tegelijkertijd op Alt + F11 om de Microsoft Visual Basic for Applications te openen. Klik in het venster Microsoft Visual Basic for Applications op Invoegen > Module en plak de volgende code in het modulevenster:

VBA-code: Wijzig de auteursnaam van alle bestaande opmerkingen in de gehele werkmap

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. Druk op de toets F5 om de code uit te voeren. Er verschijnt dan het dialoogvenster Kutools for Excel, waarin de oude opmerkingsauteur al in het tekstvak is ingevuld. Klik op de knop OK. Zie schermafbeelding:

3. Vervolgens verschijnt er nog een dialoogvenster Kutools for Excel. Typ de gewenste auteursnaam voor een nieuwe opmerking in het tekstvak en klik op de knop OK. Zie schermafbeelding:

Nu zijn alle auteursnamen van bestaande opmerkingen in de gehele werkmap direct gewijzigd naar Nieuwe Naam.

Opmerking: Deze methode werkt niet voor de nieuwe opmerking die u invoegt.

Demo: Wijzig de auteursnaam van alle opmerkingen met Kutools voor Excel

Gerelateerde artikelen