Vai al contenuto principale
 

Come contare / sommare le celle barrate in Excel?

Autore: Xiaoyang Ultima modifica: 2024-08-01

In Excel, formatta sempre il barrato per alcune celle che indicano che i valori delle celle sono inutili o non validi, in modo da poter analizzare i dati in modo più accurato. In questo articolo, parlerò di come eseguire alcuni calcoli nell'intervallo con queste celle barrate in Excel.

Contare le celle barrate in Excel

Conta senza barrare le celle in Excel

La somma esclude le celle barrate in Excel


freccia blu freccia destra Contare le celle barrate in Excel

Se vuoi sapere quante celle con formato barrato in un intervallo, puoi creare una funzione definita dall'utente, esegui le seguenti operazioni:

1. Tieni premuto il ALT + F11 chiavi per aprire il Finestra di Microsoft Visual Basic, Applications Edition.

2. Clic inserire > Modulie incolla il codice seguente nel file 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. Quindi salva e chiudi questo codice e torna al foglio di lavoro, quindi inserisci questa formula = CountStrike (A2: B14) su una cella vuota, vedi screenshot:

contare le celle barrate con la funzione definita dall'utente

4. Quindi premere entrare chiave e tutte le celle barrate sono state contate. Vedi screenshot:

risultato del conteggio delle celle barrate


freccia blu freccia destra Conta senza barrare le celle in Excel

Ma, a volte, potresti voler contare solo il numero delle celle normali che escludono le celle barrate. Il codice seguente può aiutarti.

1. Tieni premuto il ALT + F11 chiavi per aprire il Finestra di Microsoft Visual Basic, Applications Edition.

2. Clic inserire > Modulie incolla il codice seguente nel file Finestra del modulo.

Codice VBA: conta senza celle 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. Quindi salva e chiudi questo codice, torna al tuo foglio di lavoro, digita questa formula = countnostrike (A2: B14) in una cella vuota e premere entrare chiave, quindi otterrai il risultato di cui hai bisogno.

contare le celle non barrate con la funzione definita dall'utente

Note:: Nelle formule precedenti, A2: B14 è l'intervallo a cui vuoi applicare le formule.


freccia blu freccia destra La somma esclude le celle barrate in Excel

Poiché le celle barrate sono inutilizzate, qui voglio sommare solo i numeri normali senza i numeri barrati. Per risolvere questo compito, è necessaria anche una funzione definita dall'utente.

1. Tieni premuto il ALT + F11 chiavi per aprire il Finestra di Microsoft Visual Basic, Applications Edition.

2. Clic inserire > Modulie incolla il codice seguente nel file Finestra del modulo.

Codice VBA: la somma esclude 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. Quindi salva e chiudi questo codice, torna al tuo foglio di lavoro, digita questa formula = excstrike (B2: B14) in una cella vuota e premere entrare chiave e otterrai la somma di tutti i numeri senza le celle barrate. Vedi screenshot:

sommare le celle non barrate con la funzione definita dall'utente

Note:: Nelle formule precedenti, B2: B14 è l'intervallo in cui desideri sommare le celle senza il formato barrato.


Articoli correlati:

Come sommare / contare i numeri in grassetto in un intervallo di celle in Excel?

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

Come contare / sommare le celle in base ai colori dei caratteri in Excel?

I migliori strumenti per la produttività in ufficio

🤖 Assistente AI di Kutools: Rivoluziona l'analisi dei dati basandosi su: Esecuzione intelligente   |  Genera codice  |  Crea formule personalizzate  |  Analizzare i dati e generare grafici  |  Richiama le funzioni di Kutools...
Funzioni popolari: Trova, evidenzia o identifica i duplicati   |  Elimina righe vuote   |  Combina colonne o celle senza perdere dati   |   Round senza formula ...
Super ricerca: VLookup a criteri multipli    VLookup a valori multipli  |   VLookup su più fogli   |   Ricerca fuzzy ....
Elenco a discesa avanzato: Crea rapidamente un elenco a discesa   |  Elenco a discesa dipendente   |  Elenco a discesa a selezione multipla ....
Gestore di colonna: Aggiungi un numero specifico di colonne  |  Sposta colonne  |  Attiva/disattiva lo stato di visibilità delle colonne nascoste  |  Confronta intervalli e colonne ...
Funzionalità in primo piano: Messa a fuoco della griglia   |  Vista di progettazione   |   Grande barra delle formule    Gestore di cartelle di lavoro e fogli   |  Resource Library (Testo automatico)   |  Date picker   |  Combina fogli di lavoro   |  Crittografa/decrittografa le celle    Invia e-mail per elenco   |  Super filtro   |   Filtro speciale (filtro grassetto/corsivo/barrato...) ...
I 15 migliori set di strumenti12 Testo Strumenti (aggiungi testo, Rimuovi personaggi, ...)   |   50+ Grafico Tipi (Diagramma di Gantt, ...)   |   40+ Pratico Formule (Calcola l'età in base al compleanno, ...)   |   19 Inserimento Strumenti (Inserisci il codice QR, Inserisci immagine dal percorso, ...)   |   12 Conversione Strumenti (Numeri in parole, Conversione di valuta, ...)   |   7 Unisci e dividi Strumenti (Combina righe avanzate, Celle divise, ...)   |   ... e altro ancora

Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo.  Fai clic qui per ottenere la funzionalità di cui hai più bisogno...


Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro

  • 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 della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!