Hoe tel je het aantal cellen met opmerkingen in Excel?

Heb je ooit geprobeerd het aantal opmerkingen in een werkblad te tellen? In dit artikel zal ik u enkele snelle trucs voorstellen om te tellen hoeveel cellen met opmerkingen in een werkblad staan.

Tel het aantal cellen met opmerkingen met de functie Ga naar speciaal

Tel het aantal cellen met opmerkingen met de door de gebruiker gedefinieerde functie

Tel het aantal cellen met opmerkingen met VBA-code

Tel het aantal cellen met opmerkingen met de functie Ga naar speciaal

Verbazingwekkend! Efficiënte tabbladen gebruiken in Excel zoals Chrome, Firefox en Safari!

Bespaar 50% van uw tijd en verminder elke dag duizenden muisklikken!

Met de Ga naar speciaal functie in Excel, kunt u eerst alle commentaarcellen selecteren en vervolgens het telnummer in de statusbalk bekijken.

1. Ga om te klikken Home > Zoek en selecteer > Ga naar speciaal, zie screenshot:

2. In de Ga naar speciaal dialoogvenster, controleer Comments optie onder kies sectie, zie screenshot:

3. Dan klikken OK om dit dialoogvenster te sluiten, en alle cellen in het actieve werkblad die de opmerking bevatten, zijn in één keer geselecteerd. En u kunt het telnummer van de opmerkingen in de statusbalk krijgen. Zie screenshot:

Opmerking: Als u lege cellen met opmerkingen heeft, worden de lege celopmerkingen niet meegeteld.

Tip: U kunt ook op drukken Ctrl + G snelkoppelingen om te openen gaan naar dialoogvenster en klik op special knop om weer te geven Ga naar speciaal dialoogvenster.

Tel het aantal cellen met opmerkingen met de door de gebruiker gedefinieerde functie

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

1. Houd de ALT + F11 toetsen, en het opent de Microsoft Visual Basic for Applications-venster.

2. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.

VBA-code: tel het aantal cellen met commentaar

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

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

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

Tel het aantal cellen met opmerkingen met VBA-code

De volgende VBA-code kan u ook helpen bij het tellen van alle celopmerkingen, inclusief de lege celopmerkingen.

1. Houd de ALT + F11 toetsen, en het opent de Microsoft Visual Basic for Applications-venster.

2. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.

VBA-code: tel het aantal cellen met commentaar

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 F5 toets om deze code uit te voeren, en er verschijnt een promptvenster om u eraan te herinneren een gegevensbereik te selecteren waarvan u de celopmerkingen wilt tellen. Zie screenshot:

4. En klik dan OK, krijgt u het aantal celopmerkingen in de selectie.

Gerelateerde artikelen:

Hoe alle opmerkingen in een nieuw werkblad of werkmap in Excel weergeven?

Hoe tekst in opmerkingen in Excel te zoeken en te vervangen?

Hoe snel een opmerking invoegen in meerdere cellen in Excel?

De beste tools voor kantoorproductiviteit

Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%

• visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
• Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
• Voeg cellen / rijen / kolommen samen zonder gegevens te verliezen; Gespleten cellen inhoud; Combineer dubbele rijen / kolommen... Voorkom dubbele cellen; Vergelijk Ranges...
• Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
• Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
• Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
• Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
• Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
• Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2019 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Gratis proefperiode van 30 dagen met volledige functies. 60 dagen geld-terug-garantie.

Lees verder... Gratis download... Aankoop... 

---

Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

• Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
• Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
• Verhoogt uw productiviteit met 50% en vermindert elke dag honderden muisklikken voor u!

Lees verder... Gratis download... Aankoop...