Note: The other languages of the website are Google-translated. Back to English

Hoe getallen in een enkele cel in Excel optellen of optellen?

In veel gevallen moet u alle getallen in één cel optellen. Er is bijvoorbeeld een tekstreeks Klasse 1 Graad 2 in cel A1 en het resultaat van het optellen van deze getallen is 1 + 2 = 3. Dit artikel laat zien hoe u getallen in één cel met details kunt toevoegen.

Somnummers in een enkele cel met door de gebruiker gedefinieerde functie
Tel eenvoudig nummers op in een enkele cel met slechts enkele klikken


Somnummers in een enkele cel met door de gebruiker gedefinieerde functie

U kunt getallen in een enkele cel optellen met de onderstaande door de gebruiker gedefinieerde functie.

1. druk op anders + F11 toetsen tegelijkertijd om het Microsoft Visual Basic-toepassing venster.

2. In de Microsoft Visual Basic-toepassing venster klikt Invoegen > Module. En kopieer vervolgens de onderstaande VBA naar het Module venster.

VBA: somaantallen in een enkele cel

Function SumNums(pWorkRng As Range, Optional xDelim As String = " ") As Double
	Dim arr As Variant
	Dim xIndex As Long
	arr = Split(pWorkRng, xDelim)
	For xIndex = LBound(arr) To UBound(arr) Step 1
		SumNums = SumNums + VBA.Val(arr(xIndex))
	Next
End Function

3.Druk op de anders + Q toetsen om de Microsoft Visual Basic-toepassing venster.

4. Selecteer een lege cel om het resultaat uit te voeren. Voer de onderstaande formule erin in en druk op de Enter toets (A2 is de cel waarin u enkele getallen gaat optellen).

=SUMNUMS(A2)

5. Sleep vervolgens de vulhendel van de resultaatcel om de formule op andere benodigde cellen toe te passen.

Opmerking:: Deze door de gebruiker gedefinieerde functie is niet van toepassing op cellen in getalnotatie.


Tel eenvoudig nummers op in een enkele cel met slechts enkele klikken

Kutools for Excel's Som de getallen in een cel op formule kan helpen om eenvoudig getallen in een enkele cel op te tellen (inclusief cel met tekstindeling en cel met getalnotatie) met slechts enkele klikken.

Voor het aanvragen Kutools for Excel, Dan kunt u download en installeer het eerst.

1. Selecteer een lege cel om het resultaat uit te voeren. En klik dan Kutools > Formule Helper > Formule Helper.

2. In de Formule Helper dialoogvenster, configureer dan als volgt.

2.1) Zoek en selecteer Som de getallen in een cel op functie in het Kies een formule doos;
Tips: U kunt de Filteren typ een trefwoord om de gewenste formule te filteren.
2.2) In de Cel vak, specificeer een cel die de getallen bevat die u wilt optellen;
2.3) Klik op de OK knop. Zie screenshot:

3. Vervolgens wordt het resultaat in de geselecteerde cel ingevuld. Selecteer de resultaatcel en sleep de vulhendel naar beneden om de andere resultaten te krijgen.

  Als u een gratis proefperiode wilt hebben (30-dag) van dit hulpprogramma, klik om het te downloaden, en ga vervolgens de bewerking toepassen volgens de bovenstaande stappen.


Tel eenvoudig getallen op in een enkele cel met Kutools voor Excel


De beste tools voor kantoorproductiviteit

Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%

  • visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
  • Voeg cellen / rijen / kolommen samen zonder gegevens te verliezen; Gespleten cellen inhoud; Combineer dubbele rijen / kolommen... Voorkom dubbele cellen; Vergelijk Ranges...
  • Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
  • Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
  • Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2021 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Volledige functies Gratis proefperiode van 30 dagen. 60 dagen geld-terug-garantie.
kte tabblad 201905

Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
officetab onderkant
Heb je vragen? Stel ze hier. (8)
Nog geen beoordelingen. Beoordeel als eerste!
Deze opmerking is gemaakt door de moderator op de site
DANKSSSSSS ZOOO VEEL HET MODULE-IDEE IS GEWELDIG! IK WIST NOOIT DAT HET BESTAAT
Deze opmerking is gemaakt door de moderator op de site
Het probleem met deze tool is dat het alle cijfers optelt. Het probleem is 125 + 2 is niet 127. De tool zou het toevoegen als 1 + 2 + 5 + 2. Ik weet niet zeker hoe dit nuttig is voor iemand die alle getallen moet optellen. Zelfs in het voorbeeld is het niet logisch of praktisch. Heb ik iets gemist?
Deze opmerking is gemaakt door de moderator op de site
Onjuist als de getallen afzonderlijk in de cel worden ingevoerd, bijvoorbeeld 125 2 en de formule in de volgende cel wordt ingevoerd. De cel met de formule berekent 127.
Deze opmerking is gemaakt door de moderator op de site
Hi Michael,
Sorry voor de fout. Voer de volgende VBA-code in het venster Module (Code) in en pas vervolgens deze formule toe: =SUMGETALLEN(A1,"") om alle cijfers in een cel op te tellen.

Function SumNums(pWorkRng As Range, Optional xDelim As String = " ") As Double
'Updated by ExtendOffice 20221122
    If pWorkRng.CountLarge > 0 Then Exit Function
    On Error Resume Next
    Application.Volatile
    
    Dim arr As Variant
    Dim xIndex As Long
    If xDelim <> "" Then
        arr = Split(pWorkRng, xDelim)
        For xIndex = LBound(arr) To UBound(arr) Step 1
            SumNums = SumNums + VBA.Val(arr(xIndex))
        Next
    Else
        For xIndex = 1 To Len(pWorkRng) Step 1
            If IsNumeric(Mid(pWorkRng, xIndex, 1)) Then
                SumNums = SumNums + VBA.Val(Mid(pWorkRng, xIndex, 1))
            End If
        Next
    End If
End Function
Deze opmerking is gemaakt door de moderator op de site
U kunt ook heel eenvoudig "=" in de cel typen. Dus als je een cel had die 3 was maar 1+2 wilde toevoegen, zou het "=1+2" in de cel zijn
Deze opmerking is gemaakt door de moderator op de site
Ik heb een lijst met getallen die ik automatisch 30 wil toevoegen aan elk getal in elke cel. Is dat mogelijk?
Deze opmerking is gemaakt door de moderator op de site
Hoe voeg ik +1 cijfer toe aan getallen in één cel (word of excell of kladblok, maakt niet uit). Maar op Mijn werk heb ik vaak: 14,17,28,31,35,38,50,53,70,73,80,83,90,93,120,123,135,138,150,153,165,168,180,183,210,213,250,253,275,278,300,303 zoiets.

En ik moet ze maken als: 15,18,29,32,36,39,51,54,71,74,81,84,91,94,121,124,136,139,151,154,166,169,181,184,211,214,251,254,276,279,301,304. Ik doe het handmatig, maar misschien is er een snelle manier om het te doen?
Deze opmerking is gemaakt door de moderator op de site
De VBA-functiecode werkt echt goed. Dank u. 
Er zijn nog geen reacties geplaatst
Laat uw commentaar
Posten als gast
×
Beoordeel dit bericht:
0   Personages
Voorgestelde locaties

Volg ons

Copyright © 2009 - www.extendoffice.com. | Alle rechten voorbehouden. Aangedreven door ExtendOffice. | Sitemap
Microsoft en het Office-logo zijn handelsmerken of gedeponeerde handelsmerken van Microsoft Corporation in de Verenigde Staten en / of andere landen.
Beschermd door Sectigo SSL