كيف يمكنني إزالة أي نص موجود بين الأقواس في Excel؟
عند التعامل مع مجموعات البيانات في Excel، قد تصادف سلاسل نصية يحتوي جزءٌ منها على محتوى محصور بين أقواس. فعلى سبيل المثال، قد تتلقى تصدير تقرير أو إدخالات بيانات تتضمّن ملاحظات أو معلومات تكميلية أو رموزًا داخل أقواس ضمن النص. في مثل هذه الحالات، قد ترغب في الاحتفاظ بالنص الرئيسي فقط لأغراض معالجة البيانات أو العرض اللاحق، وذلك عبر إزالة كل ما هو محصور بين الأقواس — بما في ذلك الأقواس نفسها. كما يظهر في لقطة الشاشة أدناه، سيتم حذف المحتوى الموجود بين الأقواس، لتبقى نتيجة نظيفة في كل خلية.
إزالة أي شيء بين الأقواس باستخدام ميزة البحث والاستبدال
إزالة أي شيء بين الأقواس باستخدام Kutools لـ Excel
إزالة أي شيء بين الأقواس باستخدام صيغة Excel
إزالة أي شيء بين الأقواس باستخدام رمز VBA
إزالة أي شيء بين الأقواس باستخدام ميزة البحث والاستبدال
تتيح لك وظيفةالبحث والاستبدالفي Excel إزالة كل النصوص المحصورة بين الأقواس (الأقواس المستديرة) بكفاءة — بما في ذلك الأقواس نفسها! إنها طريقة مباشرة لا تتطلب أي صيغ أو أكواد، مما يجعلها مثالية للمستخدمين من جميع المستويات. وتعمل بأفضل شكل عندما تحتوي كل خلية على مجموعة واحدة فقط من الأقواس، إذ قد لا تُعالج الحالات المعقدة ذات الأقواس المتداخلة أو المتعددة بشكل مثالي بهذه الطريقة.
1. حدد نطاق الخلايا التي تحتوي على النصوص المحصورة بين الأقواس والتي تريد تنظيفها، أو حدد ورقة العمل بأكملها إذا لزم الأمر.
2. انتقل إلىالصفحة الرئيسية > بحث وتحديد > استبدال، أو اضغط ببساطة علىCtrl + H لفتح مربع حوارالبحث والاستبدالمباشرةً. انظر لقطة الشاشة أدناه:
3. في مربع حوارالبحث والاستبدال، ضمن علامة التبويباستبدال، اكتب(*) في حقلالبحث عن. اترك حقلاستبدال بـفارغًا، لأننا نريد حذف النص المحصور بين الأقواس بالكامل.
4. انقر علىاستبدال الكل. سيظهر لك تنبيه يُخبرك بعدد عمليات الاستبدال التي تمت.
5. انقر علىموافقوأغلق مربع الحوار.
نصائح: هذه الطريقة سريعة وملائمة للحالات البسيطة. يمكنك تطبيقها على نطاق محدد أو ورقة عمل كاملة أو حتى المصنف بأكمله. ومع ذلك، يُرجى ملاحظة أن النمط(*) سيتطابق مع أي محتوى—بما في ذلك المسافات—الموجود بين أي زوج من الأقواس في كل خلية. إذا احتوت الخلية على أقواس متعددة أو متداخلة، فسيتم إزالة الأقواس الخارجية وكل ما بداخلها دفعة واحدة، وقد لا يُنتج ذلك دائمًا النتيجة المرجوة.
احتياطات:لا يمكن التراجع عن إجراءالبحث والاستبدالإذا قمت بتنفيذ إجراءات أخرى بعد الاستبدال، لذا ننصحك بحفظ ملفك مسبقًا أو العمل على نسخة احتياطية.
إزالة أي شيء بين الأقواس باستخدام Kutools لـ Excel
Kutools لـ Excelيوفّر بديلاً فعّالاً وسهل الاستخدام للغاية لإزالة أي محتوى بين الأقواس عبر أوراق العمل والمصنفات. وتُقدّم أداةالتنقلالموجودة في لوحةالبحث والاستبدالحلاً مرِنًا لمعالجة كميات كبيرة من البيانات بسرعة.
1. انقر على علامة التبويبKutools أعلى Excel، ثم اخترالتنقللفتح لوحة التنقل. انظر لقطة الشاشة أدناه:
2. انقر على الرمز
لتوسيع لوحة البحث والاستبدال. في هذه اللوحة، قم بالخطوات التالية:
- (1.) انقر على علامة التبويباستبدال.
- (2.) أدخل(*) في مربعالبحث عن، واترك حقلاستبدال بـفارغًا.
- (3.) حدد نطاق العملية—تتضمن الخيارات الخلية أو ورقة العمل أو المصنف، وذلك حسب موقع البيانات المحصورة بين الأقواس.
- (4.) إذا كنت تعمل على التحديد، فاستخدم الزر
لاختيار النطاق المستهدف. - (5.) أخيرًا، انقر علىاستبدال الكللإزالة المحتوى الموجود بين الأقواس في المنطقة المحددة.
لاختيار النطاق المستهدف.
3. بعد النقر علىاستبدال الكل، سيتم حذف جميع البيانات المحصورة بين الأقواس فورًا من نطاق التحديد.
ملاحظة: نظرًا لطبيعة هذه العملية المباشرة، سيتم تعطيل وظيفة التراجع بمجرد استخدام هذه الميزة. لذا، يُوصى بشدة بعمل نسخة احتياطية من مصنفك قبل المتابعة لتجنب أي فقدان عرضي للبيانات أو إدخال تغييرات غير مرغوبة.
المزايا: يمكّنك Kutools من التعامل مع أوراق عمل متعددة ونطاقات واسعة في آنٍ واحد، مما يعزز الكفاءة بشكل كبير في المشاريع الكبيرة. وتقلل واجهته البديهية من احتمال الوقوع في الأخطاء، ما يجعله مثاليًا للمستخدمين من جميع المستويات.
Kutools لـ Excel- عزِّز Excel بقوة أكثر من 300 أداة أساسية، لتجعل عملك أسرع وأسهل، واستفد من ميزات الذكاء الاصطناعي لمعالجة البيانات بشكل أكثر ذكاءً وزيادة الإنتاجية.احصل عليه الآن
إزالة أي شيء بين الأقواس باستخدام صيغة Excel
عندما تريد الحفاظ على حل ديناميكي—أي تحديث النتيجة المُنظَّفة تلقائيًا كلما تغيّر النص الأصلي—فإن استخدام صيغ Excel قد يكون خيارك الأمثل. هذه الطريقة مثالية لإنشاء قوالب أو التعامل مع بيانات يتم تحديثها بشكل متكرر. تحذف الصيغة التالية الأقواس والمحتوى المحصور بينها من خلية تحتوي على قسم واحد فقط بين أقواس:
1. افترض أن بياناتك موجودة في الخليةA1. أدخل هذه الصيغة في الخلية المجاورة، مثلB1:
=TRIM(REPLACE(A1,FIND("(",A1),FIND(")",A1)-FIND("(",A1)+1,""))2. اضغط علىEnter للتأكيد. بعد ذلك، إذا كانت لديك صفوف إضافية، فاسحب الصيغة لأسفل لتطبيقها على السجلات الأخرى: حددB1، ثم استخدم مقبض التعبئة (المربع الموجود في الزاوية السفلية اليمنى للخلية) واسحبه لأسفل حسب الحاجة.
تفاصيل الصيغة:
- FIND(«(»,A1): يُحدد موضع القوس «(» الأول في السلسلة.)
- FIND(«)»,A1): يُحدد موضع القوس «)» الأول بعد «(».
- REPLACE(...):يستبدل كل ما بين «(» و«)» (بما في ذلك الأقواس) بسلسلة فارغة («»).
- TRIM(...): يزيل أي مسافات زائدة متبقية بعد الإزالة.
السيناريو المناسب:تعمل هذه الصيغة عندما تحتوي كل خلية على مجموعة واحدة كحدٍ أقصى من الأقواس، ولن تعالج الخلايا التي تحتوي على مجموعات متعددة من الأقواس. في هذه الحالات، فكّر في استخدام حل VBA أو أعمدة مساعدة.
تذكير بالخطأ:إذا لم يحتوِ الخلية المستهدفة على أي قوس، فستُرجع الصيغة خطأً. يمكنك تجنُّب هذا الخطأ ببساطة عن طريق تغليف الصيغة بـIFERROR، على سبيل المثال:
=IFERROR(TRIM(REPLACE(A1,FIND("(",A1),FIND(")",A1)-FIND("(",A1)+1,"")),A1)بهذه الطريقة، إذا لم توجد أقواس، يُعاد النص الأصلي دون أي تغيير.
تلميح:إذا كنت بحاجة إلى التعامل مع عدة مجموعات من الأقواس داخل خلية واحدة، ففكّر في استخدام صيغ أكثر تقدمًا أو اللجوء إلى VBA.
إزالة أي شيء بين الأقواس باستخدام رمز VBA
بالنسبة للسيناريوهات الأكثر تعقيدًا—مثلما هو الحال عندما تحتوي الخلية على عدة مجموعات من الأقواس، أو عندما تريد معالجة نطاقات كبيرة ديناميكيًا—فإن ماكروVBA يُعد خيارًا قويًا. باستخدام VBA، يمكنك إزالة كل المحتويات المحصورة بين الأقواس من الخلايا عبر ورقة العمل الخاصة بك بسلاسة.
1. لاستخدام VBA، قم أولًا بتمكين تبويب المطور (إذا لم يكن مرئيًا، انتقل إلى)ملف > خيارات > تخصيص الشريطوفعّل خانة الاختيارالمطور)، ثم انقر فوقالمطور > Visual Basic لفتح محرر VBA.
2. في محرر VBA، انقر فوقإدراج > وحدة نمطية، ثم الصق كود VBA التالي في نافذة الوحدة النمطية:
Sub RemoveBracketedContent()
Dim Rng As Range
Dim WorkRng As Range
Dim xCell As Range
Dim xTitleId As String
Dim sVal As String
Dim re As Object
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Select Range", xTitleId, WorkRng.Address, Type:=8)
If WorkRng Is Nothing Then Exit Sub
Set re = CreateObject("VBScript.RegExp")
re.Global = True
re.Pattern = "\([^\)]*\)"
For Each xCell In WorkRng
sVal = xCell.Value
If re.Test(sVal) Then
xCell.Value = Trim(re.Replace(sVal, ""))
End If
Next
End Sub3. بعد إدراج الكود، اضغط F5 لتنفيذه. سيظهر مربع حوار يطلب منك تحديد نطاق الخلايا الذي تريد معالجته؛ انقر بعد ذلك على «موافق». وفورًا سيتم إزالة كل ما هو محصور بين الأقواس—بما في ذلك الأقواس نفسها—من النطاق المحدد.
ملاحظات:
- يقوم هذا الرمز بإزالةكلالمحتوى الموجود داخل الأقواس المستديرة (الأقواس) في كل خلية، حتى لو كانت هناك مجموعات متعددة أو أقواس متداخلة.
- إذا احتوت بياناتك على أنواع أخرى من الأقواس غير الأقواس المستديرة (مثل الأقواس المعقوفة)
[ ])، فستحتاج إلى تعديلre.Patternليتطابق مع الرموز المقابلة. - يُجري VBA تغييرات مباشرة على الخلايا، لذا ننصحك بعمل نسخة احتياطية قبل التنفيذ إذا كنت ترغب في الحفاظ على بياناتك الأصلية.
المزايا:يتميّز VBA بمرونته الفائقة، ما يجعله الخيار المثالي للتعامل مع مجموعات البيانات الضخمة أو أنماط النصوص المعقدة في ورقة العمل الخاصة بك. كما يوفّر وقتك الثمين في عمليات التنظيف المتكررة، ويُعدّ حلاً مثاليًا عندما تفشل الطرق القائمة على الصيغ في تلبية احتياجاتك.
استكشاف الأخطاء وإصلاحها:
- إذا لم يُشغَّل الماكرو، فتأكد من تفعيل الماكرو في Excel الخاص بك.
- إذا لم تُعالج بعض الخلايا كما هو متوقع، فتأكد من نوع الأقواس المستخدمة ومحتوى الخلية.
باختصار، يعتمد النهج الذي تختاره على احتياجاتك المحددة: البحث والاستبدال لاستبدال سريع لمجموعات البيانات البسيطة والصغيرة؛ Kutools للنطاق الأوسع والمرونة الأعلى؛ الصيغ للتحديثات الديناميكية؛ أو VBA للتغطية المتقدمة متعددة الحالات. تذكّر دائمًا عمل نسخة احتياطية من ورقة العمل قبل إجراء أي تغييرات شاملة أو لا رجعة فيها، خاصة عند استخدام VBA أو عمليات الاستبدال الجماعية. وإذا ظهرت أخطاء أو لم تتطابق النتائج مع توقعاتك، فتحقق مجددًا من أن نوع القوس المستخدم يتوافق مع بياناتك الفعلية وأن النطاقات مُحدَّدة بدقة. كما يُوصى باستخدام أعمدة مساعدة عند تطبيق الصيغ لضمان سلامة بياناتك الأصلية.
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...
يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير
- تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
- افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
- يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!
جميع الإضافات من Kutools في برنامج تثبيت واحد!
Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.
- حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل