كيفية استخراج جميع التطابقات الجزئية في Excel؟

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

• استخراج جميع التطابقات الجزئية عمودياً باستخدام الصيغة
• استخراج جميع التطابقات الجزئية إلى خلية واحدة باستخدام دالة معرفة من قبل المستخدم
• استخراج جميع التطابقات الجزئية عمودياً أو إلى خلية واحدة باستخدام مساعد Kutools AI

استخراج جميع التطابقات الجزئية عمودياً باستخدام الصيغة

لإدخال جميع التطابقات عمودياً في عمود بناءً على نص جزئي، يمكن للصيغة المصفوفة التالية أن تساعدك:

الخطوة 1: الرجاء نسخ ولصق الصيغة أدناه في خلية فارغة حيث تريد وضع النتيجة:

=INDEX($A$2:$A$14,SMALL(IF(ISNUMBER((SEARCH($C$2,$A$2:$A$14))),MATCH(ROW($A$2:$A$14),ROW($A$2:$A$14)), ""),ROWS($E$1:E1)),COLUMNS($E$1:E1))

ملاحظة: في الصيغة أعلاه، A2:A14 هي الخلايا التي قد تحتوي على الكلمة الرئيسية التي تريد إرجاع التطابقات منها، C2 يحتوي على الكلمة الرئيسية، E1 هي الخلية فوق الصيغة.

الخطوة 2: ثم اضغط على Ctrl + Shift + Enter في نفس الوقت للحصول على أول نتيجة، وبعد ذلك اسحب مقبض التعبئة لأسفل للحصول على جميع التطابقات حتى يظهر قيمة خطأ. وأخيراً، احذف القيم الخطأ، انظر إلى لقطة الشاشة:

استخراج جميع التطابقات الجزئية إلى خلية واحدة باستخدام دالة معرفة من قبل المستخدم

إذا كنت بحاجة إلى استخراج جميع التطابقات إلى خلية واحدة، مفصولة بواسطة فاصل معين، فلا يمكن لأي صيغة وحدها تحقيق هذا. هنا، تحتاج إلى تطبيق الدالة المعرفة من قبل المستخدم التالية:

الخطوة 1: اضغط على "Alt + F11" لفتح نافذة Microsoft Visual Basic for Applications.

الخطوة 2: في نافذة "Microsoft Visual Basic for Applications"، انقر فوق "إدراج" > "وحدة"، ثم قم بنسخ الكود التالي في الوحدة.

كود VBA: استخراج جميع التطابقات الجزئية إلى خلية واحدة

Function ExtractPartMatch(rngInput As Range, rngSource As Range, Optional sDelimiter As String)
'Updateby ExtendOffice
Dim rng As Range
If sDelimiter = "" Then sDelimiter = ", "
For Each rng In rngSource
    If InStr(1, rng.Value, rngInput.Value, vbTextCompare) > 0 Then ExtractPartMatch = ExtractPartMatch & sDelimiter & rng.Value
Next
If Len(ExtractPartMatch) > 0 Then ExtractPartMatch = Mid(ExtractPartMatch, 2, Len(ExtractPartMatch))
End Function

الخطوة 3: بعد لصق الكود، الرجاء العودة إلى ورقة العمل حيث تريد تحديد النتيجة، ثم أدخل هذه الصيغة: =ExtractPartMatch(C2,$A$2:$A$14)، وبعد ذلك، اضغط على مفتاح Enter للحصول على النتيجة كما هو موضح في لقطة الشاشة أدناه:

استخراج جميع التطابقات الجزئية عمودياً أو إلى خلية واحدة باستخدام مساعد Kutools AI

مع مساعد Kutools AI، يمكنك تبسيط هذه العملية واستخراج جميع التطابقات الجزئية بنقرات قليلة فقط. تساعدك هذه الأداة الذكية على تحديد واستخراج الصفوف أو الخلايا التي تحتوي على كلمات رئيسية أو عبارات محددة، مما يوفر لك وقتًا ثمينًا ويضمن الدقة.

بعد تثبيت Kutools For Excel، الرجاء النقر فوق "Kutools" > "مساعد AI" لفتح لوحة "مساعد Kutools AI".

1. في لوحة "مساعد Kutools AI"، اكتب الطلب في مربع الدردشة: مثل:
   استخراج جميع التطابقات الجزئية عمودياً:
   استخرج الخلايا التي تحتوي على "Wood" من العمود A وضعها في العمود E، بدءًا من الخلية E2
   استخراج جميع التطابقات الجزئية إلى خلية واحدة:
   استخرج الخلايا التي تحتوي على "Wood" من العمود A وضعها في خلية واحدة E2
2. ومن ثم، اضغط على مفتاح Enter أو انقر على زر "إرسال". سيقوم Kutools AI بتحليل السؤال، وبعد الانتهاء، الرجاء النقر على زر "تنفيذ" للحصول على النتيجة.
   

في الختام، يمكن إنجاز استخراج التطابقات الجزئية في Excel من خلال طرق مختلفة حسب احتياجاتك. اختر الطريقة التي تناسب سير عملك وقم بتبسيط مهام Excel الخاصة بك! إذا كنت مهتمًا باستكشاف المزيد من نصائح وحيل Excel، يقدم موقعنا الإلكتروني آلاف الدروس التعليمية.