Hoe een bereik van cellen optellen terwijl fouten in Excel worden genegeerd?
Soms kunnen er enkele foutwaarden in uw werkblad voorkomen, maar u wilt nu het geselecteerde bereik van cellen optellen terwijl u de foutwaarden negeert. Als u de Som-functie rechtstreeks voor het bereik toepast, krijgt u een verkeerd resultaat. Hier introduceer ik u aan enkele eenvoudige en effectieve methoden.
Bereik van cellen optellen waarbij fouten worden genegeerd met behulp van een matrixformule
Bereik van cellen optellen waarbij fouten worden genegeerd met VBA-code
Bereik van cellen optellen waarbij fouten worden genegeerd met behulp van een matrixformule
Stel dat u een bereik van celwaarden heeft zoals in de volgende schermafbeelding wordt weergegeven, dan kunt u deze matrixformule toepassen om het bereik op te tellen waarbij fouten worden genegeerd. Doe dit als volgt:
1. Voer in een lege cel deze formule in =SOM(ALS(ISFOUT(A1:C6),"",A1:C6)), zie onderstaande schermafbeelding:
Opmerking: in de bovenstaande formule is A1:C6 het bereik dat u wilt optellen, u kunt dit naar wens wijzigen.
2. Druk vervolgens gelijktijdig op Ctrl + Shift + Enter om het te voltooien. U krijgt dan het volgende resultaat:
Ontdek de Magie van Excel met Kutools AI
- Slimme Uitvoering: Voer celbewerkingen uit, analyseer gegevens en maak diagrammen – allemaal aangestuurd door eenvoudige commando's.
- Aangepaste Formules: Genereer op maat gemaakte formules om uw workflows te versnellen.
- VBA-codering: Schrijf en implementeer VBA-code moeiteloos.
- Formule-uitleg: Begrijp complexe formules gemakkelijk.
- Tekstvertaling: Overbrug taalbarrières binnen uw spreadsheets.
Bereik van cellen optellen waarbij fouten worden genegeerd met VBA-code
De volgende VBA-code kan u ook helpen om snel de som van de celwaarden met fouten te verkrijgen.
1. Houd de toetsen ALT + F11 ingedrukt, en het venster Microsoft Visual Basic for Applications wordt geopend.
2. Klik op Invoegen > Module, en plak de volgende code in het Module-venster.
VBA-code: bereik van cellen optellen waarbij fouten worden genegeerd
Sub SumNumNoError()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim xSum As Long
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
If Not (IsError(Rng.Value)) Then
xSum = xSum + Rng.Value
End If
Next
MsgBox xSum
End Sub
3. Druk vervolgens op de F5-toets om de code uit te voeren, en er verschijnt een pop-up waarschuwingsvenster dat u eraan herinnert het bereik te selecteren dat u wilt optellen.
4. Klik vervolgens op OK, en u krijgt een pop-up waarschuwingsvenster dat het resultaat als volgt toont.
Gerelateerde artikelen:
Hoe de grootste of kleinste 3 waarden in een lijst in Excel op te tellen?
Hoe elke andere of elke n-de rij/kolom snel op te tellen in Excel?
Hoe alleen gefilterde of zichtbare cellen op te tellen in Excel?
Beste productiviteitstools voor Office
Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
- Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen