Hur räknar / summerar jag genomstrykningsceller i Excel?
I Excel formaterar vi alltid genomsträngning för vissa celler som anger att cellvärdena är värdelösa eller ogiltiga, så att vi kan analysera data mer exakt. I den här artikeln kommer jag att prata om hur man gör några beräkningar i intervallet med dessa genomstrykningsceller i Excel.
Räkna genomstrykningsceller i Excel
Räkna utan genomsträngningsceller i Excel
Summa utesluter genomstrykningsceller i Excel
Räkna genomstrykningsceller i Excel
Om du vill veta hur många celler som har ett genomskinligt format i ett intervall kan du skapa en användardefinierad funktion, gör så här:
1. Håll ner ALT + F11 nycklar för att öppna Microsoft Visual Basic for Applications-fönstret.
2. Klicka Insert > Modulernaoch klistra in följande kod i Modulfönster.
VBA-kod: Räkna genomsträngningsceller
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. Spara och stäng sedan den här koden och återgå till kalkylbladet och ange sedan denna formel = CountStrike (A2: B14) till en tom cell, se skärmdump:
4. Tryck sedan på ange nyckel och alla genomstrykningsceller har räknats. Se skärmdump:
Räkna utan genomsträngningsceller i Excel
Men ibland kanske du vill räkna antalet bara de normala cellerna som exkluderar genomstrykningscellerna. Följande kod kan hjälpa dig.
1. Håll ner ALT + F11 nycklar för att öppna Microsoft Visual Basic for Applications-fönstret.
2. Klicka Insert > Modulernaoch klistra in följande kod i Modulfönster.
VBA-kod: Räkna utan genomsträngningsceller
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. Spara och stäng sedan den här koden, gå tillbaka till ditt kalkylblad, skriv den här formeln = countnostrike (A2: B14) in i en tom cell och tryck på ange nyckel, då får du det resultat du behöver.
Anmärkningar: I ovanstående formler, A2: B14 är det intervall du vill använda formlerna.
Summa utesluter genomstrykningsceller i Excel
Eftersom genomstrykningscellerna är oanvända vill jag här bara summera de normala siffrorna utan genomstrykningsnumren. För att lösa denna uppgift behöver du också en användardefinierad funktion.
1. Håll ner ALT + F11 nycklar för att öppna Microsoft Visual Basic for Applications-fönstret.
2. Klicka Insert > Modulernaoch klistra in följande kod i Modulfönster.
VBA-kod: summan utesluter genomstrykningsceller
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. Spara och stäng sedan den här koden, gå tillbaka till ditt kalkylblad, skriv den här formeln = excstrike (B2: B14) in i en tom cell och tryck på ange nyckel, och du får en summering av alla siffror utan genomstrykningscellerna. Se skärmdump:
Anmärkningar: I ovanstående formler, B2: B14 är det intervall du vill summera celler utan genomstreckningsformat i.
Relaterade artiklar:
Hur summerar / räknar jag fetstil i ett antal celler i Excel?
Hur räknar man och summerar celler baserat på bakgrundsfärg i Excel?
Hur räknar / summerar jag celler baserat på teckensnittsfärgerna i Excel?
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!