Come contare / sommare le celle barrate in Excel?
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
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:
4. Quindi premere entrare chiave e tutte le celle barrate sono state contate. Vedi screenshot:
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.
Note:: Nelle formule precedenti, A2: B14 è l'intervallo a cui vuoi applicare le formule.
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:
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
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!
