Loncat ke daftar isi utama

Bagaimana cara menjumlahkan angka dalam tanda kurung hanya di Excel?

Jika ada daftar string teks, dan Anda hanya ingin menambahkan semua angka dalam tanda kurung seperti gambar di bawah ini, bagaimana Anda bisa cepat menanganinya? Pada artikel ini, saya memperkenalkan beberapa trik bagi Anda untuk menjumlahkan angka dalam tanda kurung hanya di Excel.


Jumlahkan angka dalam tanda kurung hanya dengan rumus

Untuk menjumlahkan angka dalam tanda kurung saja, Anda dapat mengekstrak angka yang ada di dalam tanda kurung terlebih dahulu, lalu menambahkannya.

1. Pilih sel kosong di sebelah sel yang ingin Anda jumlahkan jumlahnya dalam tanda kurung, B2 misalnya, masukkan rumus ini
=IF(ISERROR(MID(A1,FIND("(",A1)+1,(FIND(")",A1))-(FIND("(",A1)+1))),0,(MID(A1,FIND("(",A1)+1,(FIND(")",A1))-(FIND("(",A1)+1)))+0),
lalu seret gagang isian otomatis ke bawah untuk mengekstrak angka yang ada dalam tanda kurung dari setiap sel. Lihat tangkapan layar:
doc jumlah angka dalam tanda kurung 2

jenis: dalam rumusnya, A1 adalah sel tempat Anda ingin mengekstrak angka dalam tanda kurung.

2. Pilih sel tempat Anda akan menempatkan hasil penjumlahan, enter = SUM (B1: B8), dan tekan Enter kunci. Lihat tangkapan layar:
doc jumlah angka dalam tanda kurung 3

olymp trade indonesiaTip: dalam rumusnya, B1: B8 adalah angka yang Anda ekstrak dari daftar asli string teks dan ingin dijumlahkan.


Jumlahkan angka dalam tanda kurung hanya dengan Fungsi yang Ditentukan

Anda juga dapat menerapkan Fungsi yang Ditentukan untuk menjumlahkan angka dalam tanda kurung.

1. tekan Alt + F11 kunci untuk mengaktifkan Microsoft Visual Basic untuk Aplikasi window, klik Menyisipkan > Modul, dan tempel kode di bawah ini ke skrip kosong.

VBA: Menjumlahkan angka dalam tanda kurung

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

doc jumlah angka dalam tanda kurung 4

2. Simpan kode dan pilih sel yang akan menempatkan hasilnya, dan masukkan rumus ini = SumBracket (A1: A8), tekan Enter kunci. Lihat tangkapan layar:
doc jumlah angka dalam tanda kurung 5


Jumlahkan angka dalam tanda kurung hanya dengan Kutools for Excel

Sebenarnya, dengan Kutools untuk Excel'S Ekstrak Teks berfungsi untuk mengekstrak angka dalam tanda kurung, dan kemudian menerapkan Jumlahkan nilai absolut berfungsi untuk menjumlahkan angka-angka.

Kutools untuk Excel, dengan lebih dari 300 fungsi praktis, membuat pekerjaan Anda lebih mudah. 

Setelah menginstal Kutools for Excel, lakukan seperti di bawah ini :(Unduh Gratis Kutools untuk Excel Sekarang!)

1. Pilih string yang ingin Anda ekstrak angka dalam tanda kurung, dan klik Kutools> Teks > Ekstrak Teks. Lihat tangkapan layar:
doc jumlah angka dalam tanda kurung 6

2. Dalam Ekstrak Teks dialog, masukkan (*) ke dalam Teks kotak teks, dan klik Add untuk menambahkannya ke Ekstrak daftar. Lalu klik Ok, dan untuk memilih sel untuk menempatkan nomor yang diekstraksi dalam dialog popping, C1 misalnya. Lihat tangkapan layar:

Catatan: Jika ada aturan penggalian lain di file Ekstrak Daftar bagian, harap hapus centang aturan ekstraksi ini, dan hanya centang aturan ekstrak baru yang ditambahkan dari (*).


doc jumlah angka dalam tanda kurung 7 tembakan panah ke kanan doc jumlah angka dalam tanda kurung 8

3. klik OK, dan sekarang angka dalam tanda kurung diekstraksi. Secara default, angka dalam tanda kurung dikenali sebagai negatif, Anda perlu menjumlahkan nilai absolutnya.
doc jumlah angka dalam tanda kurung 9

4. Pilih sel tempat Anda akan menempatkan hasil kalkulasi, klik Kutools > Pembantu Formula > Matematika & Trig > Jumlahkan nilai absolut. Lihat tangkapan layar:
doc jumlah angka dalam tanda kurung 10

5. Dalam Pembantu Formula dialog, pilih rentang yang berisi nomor yang diekstrak Jumlah textbox, C1: C8 dalam kasus ini. Klik Ok, nilai absolut dari angka telah ditambahkan. Lihat tangkapan layar:

doc jumlah angka dalam tanda kurung 11 tembakan panah ke kanan doc jumlah angka dalam tanda kurung 12

Ketik. Jika Anda ingin memiliki uji coba gratis dari Ekstrak Teks dan Jumlahkan nilai absolutfungsi s, silakan buka unduh gratis Kutools for Excel pertama, lalu lanjutkan untuk menerapkan operasi sesuai langkah di atas.

Alat Produktivitas Kantor Terbaik

馃 Kutools AI Ajudan: Merevolusi analisis data berdasarkan: Eksekusi Cerdas   |  Hasilkan Kode  |  Buat Rumus Khusus  |  Analisis Data dan Hasilkan Grafik  |  Aktifkan Fungsi Kutools...
Fitur Populer: Temukan, Sorot, atau Identifikasi Duplikat   |  Hapus Baris Kosong   |  Gabungkan Kolom atau Sel tanpa Kehilangan Data   |   Putaran tanpa Formula ...
Pencarian Super: VLookup Beberapa Kriteria    VLookup Nilai Berganda  |   VLookup di Beberapa Lembar   |   Pencarian Fuzzy ....
Daftar Drop-down Lanjutan: Buat Daftar Drop Down dengan Cepat   |  Daftar Drop Down yang Bergantung   |  Multi-pilih Drop Down List ....
Manajer Kolom: Tambahkan Jumlah Kolom Tertentu  |  Pindahkan Kolom  |  Alihkan Status Visibilitas Kolom Tersembunyi  |  Bandingkan Rentang & Kolom ...
Fitur Unggulan: Fokus Kisi   |  Tampilan Desain   |   Bar Formula Besar    Manajer Buku Kerja & Lembar   |  Perpustakaan Sumberdaya (Teks otomatis)   |  Pemetik tanggal   |  Gabungkan Lembar Kerja   |  Enkripsi/Dekripsi Sel    Kirim Email berdasarkan Daftar   |  Filter Super   |   Filter Khusus (filter tebal/miring/coret...) ...
15 Perangkat Teratas12 Teks Tools (Tambahkan Teks, Hapus Karakter, ...)   |   50 + Grafik jenis (Gantt Chart, ...)   |   40+ Praktis Rumus (Hitung usia berdasarkan ulang tahun, ...)   |   19 Insersi Tools (Masukkan Kode QR, Sisipkan Gambar dari Jalur, ...)   |   12 Konversi Tools (Angka ke Kata, Konversi Mata Uang, ...)   |   7 Gabungkan & Pisahkan Tools (Lanjutan Gabungkan Baris, Pisahkan Sel, ...)   |   ... dan banyak lagi

Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu.  Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...

Deskripsi Produk


Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah

  • Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
  • Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
  • Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!
Comments (15)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hello Sunny,

I have a question as well. I have an excel sheet with numbers and some of them are in brackets. I want to add the values of the numbers in a row. Basically:
50 (50*) 100 150 = 350
How can I add (=sum) of all of them, including the one in brackets? I'ld appreciate your advise.
Best, Anna
This comment was minimized by the moderator on the site
Vielen Dank Sonnig,

jetzt ich sehe wo war das Problem. Sie schreiben im VBA und Zelle "." statt wie bei mir "," Ich habe im VBA diese Zeile:
.Pattern = "\((\d+(\.\d+)?)\)"
in diese:
.Pattern = "\((\d+(\,\d+)?)\)"
ge盲ndert und dann funktioniert alles perfekt.

Noch mall vielen, vielen Dank.
Sch枚ne Gr眉脽e

Wojtek
This comment was minimized by the moderator on the site
...ich meinte addieren Dezimalbruche 馃檪
This comment was minimized by the moderator on the site
Hi, Wojtek, if you just want to sum the decimal numbers only, try this code:
Function SumBracket(Target As Range) As Double
'UpdatebyExtendoffice20221209
Dim xCell As Range
Dim xObjs As Object, xObj As Object
Dim xSum As Double
Dim xNum As Integer
On Error Resume Next
Application.Volatile
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 + Val(xObj.submatches(0)) - Int(Val(xObj.submatches(0)))
        Next
      End If
    Next
End With
SumBracket = xSum
End Function
This comment was minimized by the moderator on the site
Hallo Sonnig,
vielen Dank f眉r die schnelle Antwort 馃榾. Um die Ganze klar zu machen gebe ich ein Beispiel meiner Aufgabe:

a(5), b(2,5), c(0,25) = 7,75

wie gesagt, mit:

a(5), b(2), c(21) im eine Zelle funktioniert die erste Makro super.

Vielen Dank und sch枚ne Gr眉脽e
Wojtek
This comment was minimized by the moderator on the site
Sorry, Wojtek, I do undestand Geman, I just translate your question by Google so that I do not get your question clearly. Could you give me more description, for example, the data structure, are they in a cell or in different cell, in a column or in a row, what result you want.
This comment was minimized by the moderator on the site
Hallo Sonnig,

noch mal vielen Dank f眉r die M眉he.

Geht um Summe alle Zahlen die in der Klammer stehen...
Erste Zelle: 458/1(2,5), 458/2(11), 458/3(0,75)
Zweite Zelle: Summe von 2,5 und 11 und 0,75
alles was in der Klammer steht in der erste Zelle sollte summiert sein. das Ergebnis soll in der Zweite Zelle erscheinen.

Vielen Dank und sch枚ne Gr眉脽e
Wojtek
This comment was minimized by the moderator on the site
Hallo,
danke, Makro funktioniert super, aber leider nur mit Ganze Zahl, nicht mit Bruchzahl. W盲re das m枚glich zu 盲ndern?
This comment was minimized by the moderator on the site
I'm sorry, I meant adding the numbers outside the bracket.
This comment was minimized by the moderator on the site
Hi, Adduar, I do not find a formula to solve your problem, maybe you only can use the Extract Text tool of Kutools for Excel to extract the numbers first, and then sum them, the conditions are *( and )*.
This comment was minimized by the moderator on the site
How to add numbers within the bracket?
This comment was minimized by the moderator on the site
Hi, How do I modify the pattern to sum everything between F-( and )


Example of my data is: F-(10) F-(12) E-(8)


the sum would be 22


thanks
This comment was minimized by the moderator on the site
Hi, Andy, please try this code:
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
This comment was minimized by the moderator on the site
Hello, is there a Google App Script version of the VBA script. I would like to use it in Google Sheets.
Thanks. :D
This comment was minimized by the moderator on the site
Sorry I do not know
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
Rate this post:
0   Characters
Suggested Locations