Come contare il numero di celle con commenti in Excel?

Avete mai provato a contare il numero di commenti in un foglio di lavoro? In questo articolo, vi presenterò alcuni trucchi rapidi per contare quante celle contengono commenti in un foglio di lavoro.

Conta il numero di celle contenenti commenti con la funzione Vai a Speciale

Conta il numero di celle contenenti commenti con una Funzione Definita dall'Utente

Conta il numero di celle contenenti commenti con il codice VBA

Conta il numero di celle contenenti commenti con la funzione Vai a Speciale

Con la funzionalità Vai a Speciale in Excel, potete prima selezionare tutte le celle con commenti e poi visualizzare il conteggio nella barra di stato.

1. Andate su Home > Trova e Seleziona > Vai a Speciale, vedere screenshot:

2. Nella finestra di dialogo Vai a Speciale, selezionate l'opzione Commenti sotto la sezione Seleziona, vedere screenshot:

3. Quindi, fate clic sul pulsante OK per chiudere questa finestra di dialogo e tutte le celle nel foglio di lavoro attivo che contengono commenti verranno selezionate contemporaneamente. Potrete ottenere il numero di commenti nella barra di stato. Vedere screenshot:

Nota: Se avete celle vuote con commenti, i commenti delle celle vuote non verranno conteggiati.

Suggerimento: Potete anche premere i tasti di scelta rapida Ctrl + G per aprire la finestra di dialogo Vai a e fare clic sul pulsante Speciale per mostrare la finestra di dialogo Vai a Speciale.

Conta il numero di celle contenenti commenti con una Funzione Definita dall'Utente

Il metodo sopra descritto ha i suoi svantaggi, quindi possiamo creare una Funzione Definita dall'Utente per contare tutti i commenti delle celle, inclusi i commenti delle celle vuote.

1. Tenete premuti i tasti ALT + F11 e si aprirà la finestra Microsoft Visual Basic for Applications.

2. Fate clic su Inserisci > Modulo e incollate il seguente codice nella finestra del modulo.

Codice VBA: Conta il numero di celle con commenti

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

3. Poi salvate e chiudete il codice, tornate al foglio di lavoro e in una cella vuota inserite questa formula: =countcomments(A1), (A1 è un riferimento di cella, potete cambiarlo in qualsiasi altro indirizzo di cella), vedere screenshot:

4. Premete il tasto Invio e otterrete il numero di commenti delle celle.

Conta il numero di celle contenenti commenti con il codice VBA

Il seguente codice VBA può anche aiutarvi a contare tutti i commenti delle celle, inclusi i commenti delle celle vuote.

1. Tenete premuti i tasti ALT + F11 e si aprirà la finestra Microsoft Visual Basic for Applications.

2. Fate clic su Inserisci > Modulo e incollate il seguente codice nella finestra del modulo.

Codice VBA: Conta il numero di celle con commenti

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. Poi premete il tasto F5 per eseguire questo codice e apparirà una finestra di promemoria che vi chiederà di selezionare un intervallo di dati in cui volete contare i commenti delle celle. Vedere screenshot:

4. E poi fate clic su OK, otterrete il numero di commenti delle celle nella selezione.

Articoli correlati:

Come elencare tutti i commenti in un nuovo foglio di lavoro o cartella di lavoro in Excel?

Come trovare e sostituire testo all'interno dei commenti in Excel?

Come inserire rapidamente un commento in più celle in Excel?