Hvordan tælles antallet af celler med kommentarer i Excel?

Har du nogensinde prøvet at tælle antallet af kommentarer i et regneark? I denne artikel vil jeg introducere dig nogle hurtige tricks til at tælle, hvor mange celler med kommentarer i et regneark.

Tæl antallet af celler, der indeholder kommentarer med funktionen Gå til speciel

Tæl antallet af celler, der indeholder kommentarer med brugerdefineret funktion

Tæl antallet af celler, der indeholder kommentarer med VBA-kode

Tæl antallet af celler, der indeholder kommentarer med funktionen Gå til speciel

Med Gå til Special funktion i Excel, kan du først vælge alle kommentarcellerne og derefter se tællingsnummeret i statuslinjen.

1. Gå til klik Hjem > Find og vælg > Gå til Special, se skærmbillede:

2. I Gå til Special dialogboks, tjek venligst Kommentarer mulighed under Type sektion, se skærmbillede:

3. Klik derefter på OK knap for at lukke denne dialog, og alle cellerne i det aktive regneark, der indeholder kommentaren, er valgt på én gang. Og du kan få antallet af kommentarer på statuslinjen. Se skærmbillede:

Bemærk: Hvis du har tomme celler med kommentarer, tælles de tomme celler ikke.

Tip: Du kan også trykke på Ctrl + G genveje, der skal åbnes gå til dialog, og klik på Særlig knap for at vise Gå til Special dialogen.

Tæl antallet af celler, der indeholder kommentarer med brugerdefineret funktion

Ovenstående metode har sin egen ulempe, så vi kan oprette en brugerdefineret funktion til at tælle alle cellekommentarer inklusive de tomme cellekommentarer.

1. Hold nede ALT + F11 tasterne, og det åbner Vinduet Microsoft Visual Basic til applikationer.

2. Klik indsatte > Moduler, og indsæt følgende kode i Modul vindue.

VBA-kode: Tæl antallet af celler med kommentar

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

3. Gem derefter og luk koden, gå tilbage til regnearket. Indtast denne formel i en tom celle: = antal kommentarer (A1), (A1 er en cellehenvisning, kan du ændre den til enhver anden celleadresse), se skærmbillede:

4. Tryk derefter på Indtast nøgle, og du får antallet af cellekommentarer.

Tæl antallet af celler, der indeholder kommentarer med VBA-kode

Følgende VBA-kode kan også hjælpe dig med at tælle alle cellekommentarer inklusive de tomme cellekommentarer.

1. Hold nede ALT + F11 tasterne, og det åbner Vinduet Microsoft Visual Basic til applikationer.

2. Klik indsatte > Moduler, og indsæt følgende kode i Modul vindue.

VBA-kode: Tæl antallet af celler med kommentar

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. Tryk derefter på F5 nøgle til at køre denne kode, og der vises et promptfelt for at minde dig om at vælge et dataområde, som du vil tælle cellekommentarerne. Se skærmbillede:

4. Og klik derefter på OK, får du antallet af cellekommentarer i markeringen.

Relaterede artikler:

Hvordan viser jeg alle kommentarer til et nyt regneark eller en projektmappe i Excel?

Hvordan finder og erstatter jeg tekst i kommentarer i Excel?

Hvordan indsættes hurtigt en kommentar til flere celler i Excel?