Hoe markeert u alle opmerkingen in Excel?
Opmerkingen zijn een handige functie om belangrijke informatie in Excel vast te leggen. Na het invoegen van een opmerking verschijnt er een kleine rode indicator in de cel. Soms vallen deze rode indicatoren echter niet goed op. Markeer daarom alle opmerkingen met een specifieke kleur voor betere zichtbaarheid. Lees dit artikel voor meer details.
Markeer alle Opmerking met de functie Ga naar speciaal
Markeer alle Opmerking met VBA-code
Markeer alle Opmerking met de functie Ga naar speciaal
In Excel kunt u eerst alle cellen met opmerkingen selecteren en deze vervolgens in één keer voorzien van een gewenste kleur. Volg hiervoor de onderstaande stappen:
1. Selecteer het gegevensbereik of het volledige werkblad waarin u de opmerking wilt markeren.
2. Klik vervolgens op Start > Zoeken en selecteren > Ga naar speciaal, zie schermafbeelding:

Tip: Gebruik de sneltoetsen Ctrl + G om het dialoogvenster Ga naar te openen en klik vervolgens op Speciaal om het dialoogvenster Ga naar speciaal te openen.
3. In het dialoogvenster Ga naar speciaal vinkt u de optie Opmerkingen aan, zie schermafbeelding:

4. Klik daarna op OK om dit dialoogvenster te sluiten. Alle opmerkingen binnen uw selectie zijn nu geselecteerd, zie schermafbeelding:

5. Nadat u de cellen met opmerkingen hebt geselecteerd, klikt u op het pictogram Vulkleur onder het tabblad Start en kiest u een gewenste kleur. Alle geselecteerde opmerkingen worden dan tegelijkertijd gekleurd, zie schermafbeelding:

Markeer alle Opmerking met VBA-code
U kunt ook onmiddellijk alle Opmerking in het actieve werkblad markeren en kleuren met de volgende VBA-code:
1. Activeer het werkblad waarin u de cellen met opmerkingen wilt markeren.
2. Houd de toetsen ALT + F11 ingedrukt om het venster Microsoft Visual Basic for Applications te openen.
3. Klik op Invoegen > Module en plak de volgende code in het Modulevenster.
VBA-code: markeer alle Opmerking
Sub ColorComments()
'Update 20141110
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeComments)
Application.ScreenUpdating = False
For Each Rng In WorkRng
Rng.Interior.ColorIndex = 36
Next
Application.ScreenUpdating = True
End Sub
4. Druk daarna op de toets F5 om deze code uit te voeren. Er verschijnt dan een meldingsvenster waarin u wordt gevraagd het bereik te selecteren waarin u de cellen met opmerkingen wilt markeren, zie schermafbeelding:

5. Klik vervolgens op OK. Alle opmerkingen in uw selectie zijn nu gemarkeerd met een kleur.

Opmerking:
In de bovenstaande code kunt u de kleurcode in de regel Rng.Interior.ColorIndex = 36 aanpassen naar uw voorkeur.
Gerelateerde artikelen:
Hoe herstelt u alle opmerkingposities in Excel?
Hoe wijzigt u de kleur van de opmerkingindicator in Excel?
Hoe voegt u automatisch datum en tijd toe aan een opmerking in Excel?
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins