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?
I migliori strumenti per la produttività in Office
Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un'efficienza mai vista prima. Kutools per Excel offre oltre300 funzionalità avanzate per aumentare la produttività e farti risparmiare tempo. Clicca qui per ottenere la funzione di cui hai più bisogno...
Office Tab porta le schede su Office e rende il tuo lavoro molto più semplice
- Abilita la modifica e lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra invece che in nuove finestre.
- Aumenta la produttività del50% e riduce centinaia di clic del mouse ogni giorno!
Tutti gli add-in Kutools. Un solo programma di installazione
La suite Kutools for Office include add-in per Excel, Word, Outlook & PowerPoint più Office Tab Pro, ideale per i team che lavorano su più app di Office.
- Suite tutto-in-uno — Add-in per Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Un solo programma di installazione, una sola licenza — configurazione in pochi minuti (pronto per MSI)
- Funzionano meglio insieme — produttività ottimizzata su tutte le app Office
- Prova completa30 giorni — nessuna registrazione, nessuna carta di credito
- Massimo risparmio — costa meno rispetto all’acquisto singolo degli add-in