انتقل إلى المحتوى الرئيسي

كيفية جمع الأرقام بين قوسين فقط في إكسيل؟

إذا كانت هناك قائمة بالسلاسل النصية ، وتريد فقط إضافة جميع الأرقام الموجودة بين قوسين كما هو موضح أدناه ، كيف يمكنك التعامل معها بسرعة؟ في هذه المقالة ، أقدم لك بعض الحيل لتلخيص الأرقام الموجودة بين قوسين فقط في Excel.


جمع الأرقام بين قوسين فقط مع الصيغة

لجمع الأرقام بين قوسين فقط ، يمكنك استخراج الأرقام الموجودة بين قوسين أولاً ، ثم جمعها.

1. حدد خلية فارغة بجوار الخلية التي تريد جمع أرقامها بين قوسين ، B2 على سبيل المثال ، أدخل هذه الصيغة
=IF(ISERROR(MID(A1,FIND("(",A1)+1,(FIND(")",A1))-(FIND("(",A1)+1))),0,(MID(A1,FIND("(",A1)+1,(FIND(")",A1))-(FIND("(",A1)+1)))+0),
ثم اسحب مقبض التعبئة التلقائية لأسفل لاستخراج الأرقام الموجودة بين قوسين من كل خلية. انظر لقطة الشاشة:
أرقام مجموع الوثيقة بين قوسين 2

معلومه- سرية: في الصيغة ، A1 هي الخلية التي تريد استخراج الأرقام الموجودة بين قوسين منها.

2. حدد الخلية التي ستضع فيها نتيجة التلخيص ، أدخل = SUM (B1: B8)، و اضغط أدخل مفتاح. انظر لقطة الشاشة:
أرقام مجموع الوثيقة بين قوسين 3

تلميح: في الصيغة ، B1: B8 هي الأرقام التي استخرجتها من القائمة الأصلية للسلسلة النصية وتريد تلخيصها.


جمع الأرقام بين قوسين فقط مع الوظيفة المعرفة

يمكنك أيضًا تطبيق وظيفة محددة لجمع الأرقام بين قوسين.

1. صحافة ALT + F11 مفاتيح للتمكين ميكروسوفت فيسوال باسيك للتطبيقات الإطار، انقر فوق إدراج > وحدة، والصق الكود أدناه في البرنامج النصي الفارغ.

فبا: مجموع الأرقام بين قوسين

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

أرقام مجموع الوثيقة بين قوسين 4

2. احفظ الكود وانتقل لتحديد خلية ستضع النتيجة ، وأدخل هذه الصيغة = SumBracket (A1: A8)، صحافة أدخل مفتاح. انظر لقطة الشاشة:
أرقام مجموع الوثيقة بين قوسين 5


مجموع الأرقام بين قوسين فقط مع كوتولس ل إكسيل

في الواقع ، مع كوتولس ل إكسيلالصورة استخراج النص وظيفة لاستخراج الأرقام الموجودة بين قوسين ، ثم تطبيق مجموع القيم المطلقة وظيفة لتلخيص الأرقام.

كوتولس ل إكسيل, مع أكثر من 300 وظائف يدوية ، تجعل مهامك أكثر سهولة. 

بعد تثبيت Kutools for Excel ، يرجى القيام بما يلي :(قم بتنزيل Kutools for Excel الآن!)

1. حدد السلاسل التي تريد استخراج الأرقام بين قوسين ، وانقر كوتولق> نص > استخراج النص. انظر لقطة الشاشة:
أرقام مجموع الوثيقة بين قوسين 6

2. في ال استخراج النص الحوار ، أدخل (*) في نص مربع النص ، وانقر فوق أضف لإضافته إلى قائمة الاستخراج. ثم اضغط Ok، ولتحديد خلية لوضع الأرقام المستخرجة في مربع الحوار ، C1 على سبيل المثال. انظر لقطة الشاشة:

ملحوظة: إذا كانت هناك قواعد استخراج أخرى في قائمة الاستخراج القسم ، يرجى إلغاء تحديد قواعد الاستخراج هذه ، والتحقق فقط من قاعدة الاستخراج المضافة الجديدة (*).


أرقام مجموع الوثيقة بين قوسين 7 حق السهم أرقام مجموع الوثيقة بين قوسين 8

3. انقر OK، والآن يتم استخراج الأرقام الموجودة بين قوسين. بشكل افتراضي ، يتم التعرف على الأرقام الموجودة بين الأقواس على أنها سالبة ، وتحتاج إلى جمع قيمها المطلقة.
أرقام مجموع الوثيقة بين قوسين 9

4. حدد الخلية التي ستضع نتيجة الحساب عليها ، انقر فوق كوتولس > مساعد الصيغة > الرياضيات ومثلثات > مجموع القيم المطلقة. انظر لقطة الشاشة:
أرقام مجموع الوثيقة بين قوسين 10

5. في ال مساعد الصيغة ، حدد النطاق الذي يحتوي على الأرقام المستخرجة فيه رقم الهاتف textbox ، C1: C8 في هذه الحالة. انقر Oك ، تم إضافة القيم المطلقة للأرقام. انظر لقطة الشاشة:

أرقام مجموع الوثيقة بين قوسين 11 حق السهم أرقام مجموع الوثيقة بين قوسين 12

تلميح. إذا كنت ترغب في الحصول على نسخة تجريبية مجانية من استخراج النص و مجموع القيمة المطلقةوظيفة s ، يرجى الانتقال لتنزيل مجاني Kutools for Excel اولا ثم انتقل لتطبيق العملية حسب الخطوات اعلاه.

أفضل أدوات إنتاجية المكتب

🤖 مساعد Kutools AI: إحداث ثورة في تحليل البيانات على أساس: التنفيذ الذكي   |  إنشاء التعليمات البرمجية  |  إنشاء صيغ مخصصة  |  تحليل البيانات وإنشاء الرسوم البيانية  |  استدعاء وظائف Kutools...
الميزات الشعبية: البحث عن التكرارات أو تمييزها أو تحديدها   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |   جولة بدون صيغة 
سوبر بحث: معايير متعددة VLookup    VLookup ذات القيمة المتعددة  |   VLookup عبر أوراق متعددة   |   بحث غامض ....
قائمة منسدلة متقدمة: إنشاء القائمة المنسدلة بسرعة   |  القائمة المنسدلة التابعة   |  قائمة منسدلة متعددة التحديد ....
مدير العمود: إضافة عدد محدد من الأعمدة  |  نقل الأعمدة  |  تبديل حالة رؤية الأعمدة المخفية  |  مقارنة النطاقات والأعمدة 
الميزات المميزة: التركيز على الشبكة   |  عرض تصميم   |   شريط الفورمولا الكبير    مدير المصنفات والأوراق   |  مكتبة الموارد (النص السيارات)   |  منتقي التاريخ   |  اجمع أوراق العمل   |  تشفير/فك تشفير الخلايا    إرسال رسائل البريد الإلكتروني عن طريق القائمة   |  سوبر تصفية   |   مرشح خاص (تصفية غامق / مائل / يتوسطه خط ...) ...
أفضل 15 مجموعة أدوات12 نص الأدوات (إضافة نص, إزالة الأحرف، ...)   |   +50 رسم الأنواع (مخطط جانت، ...)   |   40+ عملي الصيغ (احسب العمر على أساس تاريخ الميلاد، ...)   |   19 إدخال الأدوات (أدخل رمز الاستجابة السريعة, إدراج صورة من المسار، ...)   |   12 تحويل الأدوات (أرقام إلى كلمات, نتيجة تحويل عملة، ...)   |   7 دمج وتقسيم الأدوات (الجمع بين الصفوف المتقدمة, تقسيم الخلايا، ...)   |   ... و اكثر

عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت.  انقر هنا للحصول على الميزة التي تحتاجها أكثر...

الوصف


يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
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