كيف تقوم بالبحث المتقدم وإرجاع عدة قيم بدون تكرار في Excel؟

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

البحث المتقدم وإرجاع عدة قيم متطابقة بدون تكرار في Excel

• باستخدام دالتي TEXTJOIN وFILTER
• باستخدام ميزة قوية
• باستخدام دالة معرفة من قبل المستخدم

إرجاع عدة قيم متطابقة بدون تكرار باستخدام دالتي TEXTJOIN وFILTER

إذا كنت تستخدم Excel365 أو Excel2021، يمكنك الاستفادة من دالتي TEXTJOIN وFILTER لتحقيق ذلك بسهولة. تتيح لك هذه الدوال تصفية البيانات ديناميكيًا وتجميع النتائج في خلية واحدة.

يرجى إدخال الصيغة التالية في خلية فارغة لإخراج النتيجة، ثم اضغط على مفتاح "Enter" للحصول على جميع القيم المتطابقة بدون تكرار. انظر الصورة التوضيحية:

=TEXTJOIN(", ", TRUE, UNIQUE(FILTER(C2:C17, A2:A17=E2)))

إرجاع عدة قيم متطابقة بدون تكرار باستخدام ميزة قوية

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

انقر على "Kutools" > "بحث متقدم" > "بحث واحد إلى العديد (يعرض عدة نتائج)" لفتح مربع حوار "بحث واحد إلى العديد"، ثم قم بتحديد العمليات في مربع الحوار:

1. حدد "منطقة وضع القائمة" و"نطاق القيم المراد البحث فيها" في مربعات النص بشكل منفصل؛
2. حدد نطاق الجدول الذي ترغب في استخدامه؛
3. حدد العمود الرئيسي وعمود الإرجاع من قوائم "العمود الرئيسي" و"عمود الإرجاع" المنسدلة بشكل منفصل;
4. أخيرًا، انقر على زر "موافق".
   

النتيجة:

الآن، يمكنك رؤية جميع القيم المتطابقة تم استخراجها بدون عناصر مكررة، انظر الصورة التوضيحية:

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

إرجاع عدة قيم متطابقة بدون تكرار حتى في الإصدارات الأقدم من Excel.

1. اضغط باستمرار على مفتاحي "Alt" + "F11" لفتح نافذة "Microsoft Visual Basic for Applications".
2. انقر على "إدراج" > "وحدة نمطية"، ثم الصق الكود التالي في نافذة "الوحدة النمطية".

   كود VBA: البحث المتقدم وإرجاع عدة قيم فريدة متطابقة:

     Function VlookupUnique(lookupValue As String, lookupRange As Range, resultRange As Range, delim As String) As String
       Dim cell As Range
       Dim result As String
       Dim dict As Object
       Set dict = CreateObject("Scripting.Dictionary")
       For Each cell In lookupRange
           If cell.Value = lookupValue Then
               If Not dict.exists(resultRange.Cells(cell.Row - lookupRange.Row + 1, 1).Value) Then
                   dict.Add resultRange.Cells(cell.Row - lookupRange.Row + 1, 1).Value, True
                   result = result & delim & resultRange.Cells(cell.Row - lookupRange.Row + 1, 1).Value
               End If
           End If
       Next cell 
       If Len(result) > 0 Then
           VlookupUnique = Mid(result, Len(delim) + 1)
       Else
           VlookupUnique = ""
       End If
   End Function

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

   =VlookupUnique(E2, A2:A17, C2:C17, ", ")

   
   

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