Hoe het aantal cellen met opmerkingen in Excel te tellen?

Heeft u ooit geprobeerd het aantal opmerkingen in een werkblad te tellen? In dit artikel introduceer ik enkele snelle trucs om te tellen hoeveel cellen met opmerkingen er in een werkblad voorkomen.

Aantal cellen met opmerkingen tellen met de functie Ga naar Speciaal

Aantal cellen met opmerkingen tellen met een door de gebruiker gedefinieerde functie

Aantal cellen met opmerkingen tellen met VBA-code

Aantal cellen met opmerkingen tellen met de functie Ga naar Speciaal

Met de functie Ga naar Speciaal in Excel kunt u eerst alle cellen met opmerkingen selecteren en vervolgens het aantal bekijken in de statusbalk.

1. Ga naar Start > Zoeken en selecteren > Ga naar Speciaal, zie screenshot:

2. Selecteer in het dialoogvenster Ga naar Speciaal de optie Opmerkingen onder de sectie Selecteren, zie screenshot:

3. Klik vervolgens op de knop OK om dit dialoogvenster te sluiten, en alle cellen in het actieve werkblad die een opmerking bevatten, worden tegelijkertijd geselecteerd. U kunt het aantal opmerkingen bekijken in de statusbalk. Zie screenshot:

Opmerking: Als u lege cellen met opmerkingen heeft, worden de opmerkingen in de lege cellen niet geteld.

Tip: U kunt ook de sneltoets Ctrl + G gebruiken om het dialoogvenster Ga naar te openen en klik op de knop Speciaal om het dialoogvenster Ga naar Speciaal te tonen.

Aantal cellen met opmerkingen tellen met een door de gebruiker gedefinieerde functie

De bovenstaande methode heeft zijn eigen nadelen, dus we kunnen een door de gebruiker gedefinieerde functie maken om alle celopmerkingen te tellen, inclusief de opmerkingen in lege cellen.

1. Houd de toetsen ALT + F11 ingedrukt, en het venster Microsoft Visual Basic for Applications wordt geopend.

2. Klik op Invoegen > Module, en plak de volgende code in het modulevenster.

VBA-code: Aantal cellen met opmerkingen tellen

Function CountComments(xCell As Range)
'Update 20140924
    Application.Volatile
    CountComments = xCell.Parent.Comments.Count
End Function

3. Sla de code vervolgens op en sluit deze, ga terug naar het werkblad en voer in een lege cel de volgende formule in: =countcomments(A1), (A1 is een celverwijzing, u kunt dit wijzigen naar elk ander celadres), zie screenshot:

4. Druk vervolgens op Enter en u krijgt het aantal celopmerkingen.

Aantal cellen met opmerkingen tellen met VBA-code

De volgende VBA-code kan u ook helpen om alle celopmerkingen te tellen, inclusief de opmerkingen in lege cellen.

1. Houd de toetsen ALT + F11 ingedrukt, en het venster Microsoft Visual Basic for Applications wordt geopend.

2. Klik op Invoegen > Module, en plak de volgende code in het modulevenster.

VBA-code: Aantal cellen met opmerkingen tellen

Sub CountComments()
'Update 20140924
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)
If VBA.Err > 0 Then
    MsgBox 0
Else
    MsgBox WorkRng.Count
End If
End Sub

3. Druk vervolgens op de toets F5 om deze code uit te voeren, en er verschijnt een pop-upvenster dat u eraan herinnert een gegevensbereik te selecteren waarin u de celopmerkingen wilt tellen. Zie screenshot:

4. Klik vervolgens op OK, en u krijgt het aantal celopmerkingen in de selectie.

Gerelateerde artikelen:

Hoe alle opmerkingen naar een nieuw werkblad of werkboek in Excel te verplaatsen?

Hoe tekst binnen opmerkingen in Excel te zoeken en vervangen?

Hoe snel een opmerking in meerdere cellen in Excel in te voegen?