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

Jak sčítat čísla v závorkách pouze v aplikaci Excel?

Pokud existuje seznam textových řetězců a chcete pouze sečíst všechna čísla v závorkách, jak je uvedeno níže, jak to můžete rychle zvládnout? V tomto článku vám představím několik triků, jak sčítat čísla v závorkách pouze v aplikaci Excel.


Součet čísel v závorkách pouze se vzorcem

Chcete-li sečíst čísla pouze v závorkách, můžete nejprve extrahovat čísla, která jsou v závorkách, a poté je sečíst.

1. Vyberte prázdnou buňku vedle buňky, kterou chcete sečíst její čísla v závorkách, například B2, zadejte tento vzorec
=IF(ISERROR(MID(A1,FIND("(",A1)+1,(FIND(")",A1))-(FIND("(",A1)+1))),0,(MID(A1,FIND("(",A1)+1,(FIND(")",A1))-(FIND("(",A1)+1)))+0),
a potom přetáhněte rukojeť automatického vyplňování dolů a z každé buňky extrahujte čísla, která jsou v závorkách. Viz snímek obrazovky:
čísla doc sum v závorkách 2

Tip: ve vzorci je A1 buňka, ze které chcete extrahovat čísla v závorkách.

2. Vyberte buňku, do které umístíte výsledek sčítání, zadejte = SUM (B1: B8), a stiskněte tlačítko vstoupit klíč. Viz snímek obrazovky:
čísla doc sum v závorkách 3

Tip: ve vzorci B1: B8 jsou čísla, která jste extrahovali z původního seznamu textového řetězce a chcete je shrnout.


Součet čísel v závorkách pouze s definovanou funkcí

Můžete také použít definovanou funkci na součet čísel v závorkách.

1. lis Alt + F11 klíče k povolení Microsoft Visual Basic pro aplikace okno, klepněte na tlačítko Vložit > Modula vložte níže uvedený kód do prázdného skriptu.

VBA: Součet čísel v závorkách

Function SumBracket(Target As Range) As Double
'UpdatebyExtendoffice20160901
Dim xCell As Range
Dim xObjs As Object, xObj As Object
Dim xSum As Double
Set xObjs = CreateObject("VBScript.RegExp")
xSum = 0
With xObjs
    .Global = True
    .Pattern = "\((\d+(\.\d+)?)\)"

    For Each xCell In Target
      If xCell.Value <> "" Then
        For Each xObj In xObjs.Execute(xCell.Value)
            xSum = xSum + xObj.submatches(0)
        Next
      End If
    Next
End With
SumBracket = xSum
End Function

čísla doc sum v závorkách 4

2. Uložte kód, vyberte buňku, do které se umístí výsledek, a zadejte tento vzorec = SumBracket (A1: A8), lis vstoupit klíč. Viz snímek obrazovky:
čísla doc sum v závorkách 5


Součet čísel v závorkách pouze s programem Kutools pro Excel

Vlastně s Kutools pro ExcelJe Extrahujte text funkce pro extrahování čísel v závorkách a poté použití Součet absolutních hodnot funkce sečíst čísla.

Kutools pro Excel, s více než 300 užitečné funkce, které vám usnadní práci. 

Po instalaci Kutools pro Excel, prosím, postupujte takto :(Stažení zdarma Kutools pro Excel hned teď!)

1. Vyberte řetězce, které chcete extrahovat čísla v závorkách, a klepněte na Kutools> text > Extrahujte text. Viz snímek obrazovky:
čísla doc sum v závorkách 6

2. V Extrahujte text dialogové okno, zadejte (*) do text textové pole a klikněte na přidat přidat to Seznam výpisů. Pak klikněte na tlačítko Ok, a pro výběr buňky pro umístění extrahovaných čísel do rozbalovacího dialogu, například C1. Viz snímek obrazovky:

Poznámka: Pokud v systému existují další pravidla pro těžbu Seznam výpisů sekce, prosím zrušte zaškrtnutí těchto pravidel pro extrakci a zkontrolujte pouze nově přidané pravidlo pro extrakci z (*).


čísla doc sum v závorkách 7 výstřel šipka vpravo čísla doc sum v závorkách 8

3. cvaknutí OKa nyní jsou čísla v závorkách extrahována. Ve výchozím nastavení jsou čísla v závorkách rozpoznána jako záporná, je třeba sečíst jejich absolutní hodnoty.
čísla doc sum v závorkách 9

4. Vyberte buňku, do které umístíte výsledek výpočtu, klikněte na Kutools > Pomocník vzorců > Math & Trig > Součet absolutních hodnot. Viz snímek obrazovky:
čísla doc sum v závorkách 10

5. V Pomocník vzorců V dialogovém okně vyberte rozsah, do kterého jsou extrahována čísla Číslo textové pole, v tomto případě C1: C8. Klepněte na Ok, byly přidány absolutní hodnoty čísel. Viz snímek obrazovky:

čísla doc sum v závorkách 11 výstřel šipka vpravo čísla doc sum v závorkách 12

Spropitné. Pokud chcete mít bezplatnou zkušební verzi Extrahujte text a Součet absolutní hodnotyfunkce, přejděte zdarma ke stažení Kutools pro Excel nejprve a poté přejděte k použití operace podle výše uvedených kroků.


Nejlepší kancelářské nástroje produktivity

Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%

  • Opakované použití: Rychle vložte složité vzorce, grafy a cokoli, co jste dříve používali; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
  • Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
  • Sloučit buňky / řádky / sloupce bez ztráty dat; Rozdělit obsah buněk; Zkombinujte duplicitní řádky / sloupce... Zabraňte duplicitním buňkám; Porovnat rozsahy...
  • Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
  • Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
  • Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
  • Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
  • Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
  • Více než 300 výkonných funkcí. Podporuje Office / Excel 2007-2019 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Kompletní funkce 30denní bezplatná zkušební verze. 60denní záruka vrácení peněz.
karta kte 201905

Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50% a omezuje stovky kliknutí myší každý den!
officetab dno
Komentáře (7)
Zatím žádné hodnocení. Buďte první, kdo ohodnotí!
Tento komentář byl moderátorem webu minimalizován
Dobrý den, existuje verze skriptu VBA v jazyce Google App Script? Chtěl bych to použít v Tabulkách Google.
Dík. : D
Tento komentář byl moderátorem webu minimalizován
Promiň, nevím
Tento komentář byl moderátorem webu minimalizován
Ahoj, jak mohu upravit vzor tak, aby sčítal vše mezi F-( a )


Příklad mých údajů je: F-(10) F-(12) E-(8)


součet by byl 22


Díky
Tento komentář byl moderátorem webu minimalizován
Ahoj, Andy, zkuste prosím tento kód:
Funkce SumBracket(Target As Range) As Double
'AktualizovatExtendoffice20160901
Dim xCell As Range
Dim xObjs As Object, xObj As Object
Dim xSum As Double
Set xObjs = CreateObject("VBScript.RegExp")
x Součet = 0
S xObjs
.Globální = Pravda
.Vzor = "\-\((\d+(\.\d+)?)\)"

Pro každý cíl xCell
Pokud xCell.Value <> "" Pak
Pro každý xObj v xObjs.Execute(xCell.Value)
xSum = xSum + xObj.submatches(0)
další
End If
další
Konec s
SumBracket = xSum
End Function
Tento komentář byl moderátorem webu minimalizován
Jak přidat čísla do závorky?
Tento komentář byl moderátorem webu minimalizován
Omlouvám se, chtěl jsem přidat čísla mimo závorku.
Tento komentář byl moderátorem webu minimalizován
Ahoj, Adduare, nenašel jsem vzorec, který by vyřešil váš problém, možná můžete použít pouze nástroj Extrahovat text z Kutools pro Excel, abyste nejprve extrahovali čísla a pak je sečetli, podmínky jsou *( a )*.
Zatím zde nejsou žádné komentáře
Zanechat své připomínky
Odesílání jako host
×
Ohodnoťte tento příspěvek:
0   Postavy
Doporučená umístění