Hoe tekst in opmerkingen (notities) in Excel te zoeken en vervangen?
De functie Zoeken en Vervangen in Excel is een krachtig hulpmiddel om snel inhoud binnen cellen bij te werken, maar deze is niet direct van toepassing op Notities — de nieuwe naam voor traditionele opmerkingen vóór Excel 2019. Veel gebruikers vragen zich af of het mogelijk is om dezelfde functionaliteit toe te passen op de tekst binnen Excel-notities. Deze handleiding laat zien hoe je effectief tekst kunt zoeken en vervangen in notities, waardoor je beter alle aspecten van je spreadsheets kunt beheren en verfijnen.
VBA-code gebruiken om tekst in opmerkingen (notities) te zoeken en vervangen
VBA-code gebruiken om tekst in opmerkingen (notities) te zoeken en vervangen
In Excel kun je de volgende VBA-code gebruiken om tekst in alle notities te zoeken en te vervangen. Bijvoorbeeld, ik zal de tekst "2011" vervangen door de tekst "2012" in alle notities in Excel.
1. Klik op Ontwikkelaar > Visual Basic en er verschijnt een nieuw Microsoft Visual Basic for Applications-venster. Klik op Invoegen > Module en voer vervolgens de volgende VBA-code in in de Module:
VBA-code: Zoek en vervang tekst in alle notities in Excel
Sub ReplaceNotes()
'Updated by Extendoffice 2024/07/25
Dim cell As Range
Dim wks As Worksheet
Dim sFind As String
Dim sReplace As String
Dim sNote As String
' Define the text to find and replace
sFind = "2011"
sReplace = "2012"
' Loop through each worksheet in the active workbook
For Each wks In ActiveWorkbook.Worksheets
For Each cell In wks.Cells
If cell.NoteText <> "" Then
sNote = cell.NoteText
If InStr(sNote, sFind) > 0 Then
sNote = Replace(sNote, sFind, sReplace)
cell.NoteText Text:=sNote, Start:=1, Length:=Len(cell.NoteText)
End If
End If
Next cell
Next wks
End Sub
2. Klik vervolgens op de
knop om de code uit te voeren, en alle "2011" in alle notities zullen worden vervangen door "2012" in het hele werkboek.
Een handig hulpmiddel om tekst in opmerkingen (notities) snel en gemakkelijk te zoeken en te vervangen
We kunnen snel tekst in alle notities zoeken en vervangen met Kutools voor Excel’s Zoek/Vervang Notitietekst.
Als je Kutools voor Excel hebt geïnstalleerd, kun je eenvoudig tekst in alle notities in Excel zoeken en vervangen.
1. Klik op Kutools > Meer > Zoek/Vervang Notitietekst.
2. In het dialoogvenster Zoek/Vervang Notitietekst:
- (1.) Selecteer het bereik waarop je dit hulpprogramma wilt toepassen, je kunt Huidig werkblad of Alle werkbladen selecteren;
- (2.) Voer de tekst (2011) die je wilt vervangen in het vak Tekst in notities zoeken in, en voer de specifieke tekst (2012) die je wilt gebruiken in het vak Vervangen door in.
3. Klik vervolgens op de knop Vervangen. Alle 2011 wordt vervangen door 2012 in de opmerkingen in het actieve werkblad. Zie screenshots:
 |  |  |
Gerelateerde artikelen:
- Alle opmerkingsindelingen in cellen wijzigen
- Alle auteursnamen van opmerkingen wijzigen
- Alle opmerkingen naar een nieuw werkblad of werkboek weergeven
- Alle opmerkingen en opmerkingsindicatoren in Excel weergeven of verbergen
- Celinhoud naar opmerkingen converteren in Excel
- Opmerkingen naar celinhoud converteren in Excel
Beste productiviteitstools voor Office
Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
- Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen