KutoolsforOffice — Un'unica soluzione, cinque potenti strumenti.Ottenere di più con meno sforzo.

Come contare o sommare le celle barrate in Excel?

AutoreXiaoyang Data di modifica

In Excel è comune applicare la formattazione barrata a determinate celle per contrassegnare i dati come obsoleti, irrilevanti o non validi. Questo accorgimento visivo può migliorare notevolmente la gestione dei dati e aiutarti a concentrarti sulle informazioni rilevanti durante l’analisi. Tuttavia, quando si tratta di eseguire calcoli – ad esempio contare o sommare – potresti voler separare i risultati relativi alle celle barrate da quelli non barrati. Sapere come gestire questi scenari può ottimizzare il tuo flusso di lavoro e portare a risultati più accurati. Questo articolo illustra diversi metodi pratici per contare e sommare celle con o senza formattazione barrata in Excel, utilizzando funzioni VBA personalizzabili che offrono flessibilità per diverse esigenze di gestione dati.

Contare le celle barrate con VBA in Excel

Contare le celle non barrate con VBA in Excel

Sommare escludendo le celle barrate con VBA in Excel

Contare o sommare celle barrate utilizzando Kutools per Excel


Contare le celle barrate in Excel

Se devi determinare il numero totale di celle formattate con il testo barrato in un intervallo specifico, non puoi farlo direttamente con le funzioni integrate di Excel, poiché nessuna formula riconosce automaticamente la formattazione del testo, come il barrato. In questi casi, la soluzione più pratica è ricorrere a una funzione definita dall’utente (UDF) in VBA. Questo approccio si rivela particolarmente efficace nella gestione di elenchi di attività, aggiornamenti di inventario o qualsiasi scenario in cui il testo barrato segnala dati completati, non validi o obsoleti.

1. Tieni premuti i tasti ALT + F11 per aprire la finestra di Microsoft Visual Basic for Applications.

2. Nella finestra di VBA, fai clic su Inserisci > Modulo per creare un nuovo modulo, quindi incolla il codice seguente nella finestra del modulo.

Codice VBA: Conta le celle barrate

Public Function CountStrike(pWorkRng As Range) As Long
'Update 20140819
Application.Volatile
Dim pRng As Range
Dim xOut As Long
xOut = 0
For Each pRng In pWorkRng
    If pRng.Font.Strikethrough Then
        xOut = xOut + 1
    End If
Next
CountStrike = xOut
End Function

3. Dopo aver inserito il codice, salva la cartella di lavoro (per conservare la macro), chiudi l’editor VBA e torna al foglio di lavoro. In qualsiasi cella vuota in cui desideri visualizzare il risultato, inserisci la seguente formula — ad esempio, per contare le celle barrate nell’intervallo A2:B14: =CountStrike(A2:B14)

Suggerimento: puoi sostituire A2:B14 con qualsiasi altro intervallo che desideri verificare.

conta celle barrate con funzione definita dall'utente

4. Premi il tasto Invio per eseguire la formula e Excel mostrerà immediatamente il conteggio di tutte le celle barrate nell’intervallo limitato. Potrai così monitorare efficacemente l’avanzamento o rimuovere voci obsolete, se necessario. Vedi screenshot:

risultato del conteggio delle celle barrate

Avvertenza: per garantire che questo codice VBA rimanga disponibile in futuro, salva il file nel formato .xlsm (cartella di lavoro abilitata per le macro di Excel).


Contare le celle non barrate in Excel

In alcuni casi potresti aver bisogno di contare solo le celle che non presentano la formattazione barrata in un determinato intervallo. Ad esempio, nelle tabelle di monitoraggio progetti o nei dati di vendita, spesso si desidera contare esclusivamente le voci attive o valide — ovvero quelle non barrate — per elaborazioni successive. Le funzioni predefinite di Excel come CONTA.NUMERI o CONTA.VALORI ignorano completamente la formattazione del testo; per questo motivo, una soluzione VBA personalizzata ti offre il controllo preciso necessario per soddisfare queste esigenze.

1. Premi ALT + F11 per avviare la finestra di Microsoft Visual Basic for Applications.

2. Vai su Inserisci > Modulo per aggiungere un nuovo modulo di codice. Incolla il seguente codice nella finestra del modulo.

Codice VBA: Conta le celle non barrate

Public Function CountNoStrike(pWorkRng As Range) As Long
'Update 20140819
Application.Volatile
Dim pRng As Range
Dim xOut As Long
xOut = 0
For Each pRng In pWorkRng
    If Not pRng.Font.Strikethrough Then
        xOut = xOut + 1
    End If
Next
CountNoStrike = xOut
End Function

3. Salva la tua cartella di lavoro abilitata per le macro, torna al foglio di lavoro e in una cella vuota inserisci la formula (ad esempio, per)A2:B14):=countnostrike(A2:B14) Quindi premi Invio per ottenere il risultato. Excel conterà solo le celle all’interno dell’intervallo selezionato che non presentano la formattazione barrata.

conta celle non barrate con funzione definita dall'utente

Nota: nell’esempio precedente, A2:B14 è l’intervallo di celle valutato. Modifica il riferimento all’intervallo in base alle tue esigenze. Tieni presente che celle unite o formattazioni speciali potrebbero talvolta influenzare i risultati: verifica attentamente che l’intervallo contenga solo le celle previste.


Sommare escludendo le celle barrate in Excel

Quando si lavora con dati numerici in cui alcune voci non sono più attive o devono essere ignorate — ad esempio perché formattate con testo barrato — è spesso fondamentale sommare soltanto i numeri validi. Questa esigenza è comune nei fogli di bilancio, nella gestione degli inventari o nel monitoraggio delle attività, dove le voci barrate indicano elementi obsoleti o completati da escludere dai totali. Dato che la funzione SOMMA integrata di Excel non distingue tra celle formattate e non formattate, per eseguire questa operazione è necessario ricorrere a una funzione VBA personalizzata.

1. Usa ALT + F11 per aprire l’editor di Microsoft Visual Basic for Applications.

2. Fai clic su Inserisci > Modulo per aggiungere un modulo e incolla il codice seguente nella relativa finestra.

Codice VBA: Somma escludendo le celle barrate

Public Function ExcStrike(pWorkRng As Range) As Long
'Update 20140819
Application.Volatile
Dim pRng As Range
Dim xOut As Long
xOut = 0
For Each pRng In pWorkRng
    If Not pRng.Font.Strikethrough Then
        xOut = xOut + pRng.Value
    End If
Next
ExcStrike = xOut
End Function

3. Salva e chiudi l’editor VBA. Nel foglio di lavoro desiderato, seleziona una cella vuota e inserisci la seguente formula (ad esempio, per)B2:B14):=excstrike(B2:B14)Premi Invio e Excel sommerà automaticamente solo le celle nell’intervallo specificato che non presentano la formattazione barrata, restituendo immediatamente un totale aggiornato che esclude i valori obsoleti.

somma celle non barrate con funzione definita dall'utente

Nota: modifica B2:B14 in base al tuo effettivo intervallo dati. Questa funzione ignora le celle barrate, indipendentemente dal loro valore. Se ottieni risultati inaspettati, assicurati che tutte le celle contengano valori numerici e abbiano la formattazione corretta.

Suggerimento pratico: se devi aggiornare la somma dopo aver modificato lo stato barrato di una cella, ricalcola il foglio di lavoro premendo F9.


Contare o sommare celle barrate utilizzando Kutools per Excel

Se desideri contare o sommare solo le celle con testo barrato, Excel non offre un metodo integrato per farlo, ma Kutools per Excel lo rende semplice grazie alla sua funzionalità Filtro speciale.

1. Seleziona la colonna

Fai clic sulla colonna che contiene le celle formattate con il testo barrato.

2. Apri Filtro speciale

Vai alla scheda KUTOOLS PLUS, quindi fai clic su Filtro speciale > Filtra celle con barratura.

3. Conferma il filtro

Verrà visualizzata una finestra di dialogo che mostra quante celle soddisfano la condizione. Fai clic su OK per continuare.

kutools-filter-result

4. Visualizza i risultati

Le celle barrate sono ora filtrate e visibili. Seleziona l’intervallo di filtro: vedrai immediatamente Somma, Media e Conteggio nella Barra di stato in basso di Excel.

kutools-count-sum

Perché usare Kutools?

Kutools per Excel offre oltre 300 funzionalità potenti e intuitive, proprio come questa, per farti risparmiare tempo e aumentare la produttività—senza dover scrivere formule complesse o codice VBA.

Che tu debba filtrare per formattazione, pulire i dati, unire fogli o apportare modifiche in batch, Kutools semplifica il tuo lavoro in pochi secondi.

Prova Kutools per Excel gratuitamente per 30 giorni e scopri tutto ciò che ti sei perso!


Articoli correlati:

Come sommare o contare i numeri in grassetto all’interno di un intervallo di celle in Excel?

Come contare e sommare le celle in base al colore di sfondo in Excel?

Come contare o sommare le celle in base al colore del carattere in Excel?

Migliori Strumenti per la Produttività in Office

🤖KUTOOLS AI Assistente: Rivoluziona Analisi dei dati in base a:Esecuzione Intelligente   |  Genera Codice|  Crea formule personalizzate  |  Analizza Dati e Genera Grafici|  Richiama Funzioni avanzate
Funzionalità Popolari:Trova, Evidenzia o Contrassegna Duplicati   |  Elimina righe vuote   |  Combinare Colonne o Celle senza Perdere Dati   |   Arrotondamento senza usare la formula...
Super RICERCA.VERT:VLookup con Criteri Multipli  |  VLookup con Valori Multipli  |   VLookup tra Fogli Multipli   |   Corrispondenza approssimativa....
Elenco a discesa avanzato:Crea Rapidamente un Elenco a Discesa   |  Elenco a Discesa Dipendente   |  Elenco a Discesa con Selezione Multipla....
Gestione Colonne:Aggiungi un Numero Specifico di Colonne|Sposta Colonne|Attiva/Disattiva lo Stato di Visibilità delle Colonne Nascoste|Confronta Intervalli e Colonne...
Funzionalità in Evidenza:Attenzione della griglia   |  Visualizzazione Design   |Barra delle formule avanzata   | Gestione Cartelle di Lavoro e Fogli   |  Biblioteca di risorse(Testo Automatico)|  Selettore di Date   |  Unisci fogli di lavoro  |  Crittografa/Decrittografa celle   | Invia Email da Lista   |  Super Filtri   |   Filtro speciale(Filtra celle con testo in grassetto/corsivo/barrato...) ...
Principali Set di Strumenti 15:12 Strumentiper il Testo(Aggiungi testo,Elimina Caratteri Specifici, ...)|   50+Tipidi Grafico(Diagramma di Gantt, ...)|   40+ Formule Pratiche(Calcola l'età in base alla data di nascita, ...)|   19 Strumentidi Inserimento(Inserisci Codice QR,Inserisci Immagine dal Percorso, ...)|   12 Strumentidi Conversione(Converti in parole,Conversione del tasso di cambio, ...)|   7 StrumentiUnisci e Dividi(Unione avanzata righe,Dividi celle, ...)|... e molto altro
Usa Kutools nella tua lingua preferita – supporta inglese, spagnolo, tedesco, francese, cinese e 40+ altre!

Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...


Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede all’interno della stessa finestra, invece che in finestre separate.
  • Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!

Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.

Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.

ExcelWordOutlookTabsPowerPoint
  • Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
  • Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
  • Funziona meglio insieme— produttività ottimizzata tra le app di Office
  • Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
  • Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi