نصيحة: اللغات الأخرى مترجمة من قبل Google. يمكنك زيارة English نسخة من هذا الرابط.
تسجيل الدخول
x
or
x
x
التسجيل
x

or

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

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

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

عرض قيم بحث متعددة في خلية مفصولة بفواصل واحدة مع وظيفة محدد من قبل المستخدم

عرض قيم بحث متعددة في خلية مفصولة بفواصل واحدة مع كوتولس فور إكسيل


عرض قيم بحث متعددة في خلية مفصولة بفواصل واحدة مع وظيفة محدد من قبل المستخدم

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

1. اضغط باستمرار ALT + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. انقر إدراج > وحدة، ولصق التعليمة البرمجية التالية في وحدة نافذة او شباك.

كود فبا: ارجع قيم البحث المتعددة في خلية مفصولة بفواصل واحدة

Function SingleCellExtract(LookupValue As String, LookupRange As Range, ColumnNumber As Integer, Char As String)
'Updateby20150824
    Dim I As Long
    Dim xRet As String
    For I = 1 To LookupRange.Columns(1).Cells.Count
        If LookupRange.Cells(I, 1) = LookupValue Then
            If xRet = "" Then
                xRet = LookupRange.Cells(I, ColumnNumber) & Char
            Else
                xRet = xRet & "" & LookupRange.Cells(I, ColumnNumber) & Char
            End If
        End If
    Next
    SingleCellExtract = Left(xRet, Len(xRet) - 1)
End Function

3. ثم احفظ هذا الرمز وأغلق نافذة الوحدة النمطية، عد إلى ورقة العمل، وأدخل هذه الصيغة: = SingleCellExtract (D2، A2: B15,2، "،") إلى خلية فارغة تريد إرجاع النتيجة. ثم اضغط أدخل مفتاح للحصول على النتيجة، انظر الصورة:

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

ملاحظة:: في الصيغة أعلاه:

D2: يشير إلى قيم الخلايا التي تريد البحث عنها؛

أكسنومك: بكسنومكس: هو نطاق البيانات الذي تريد جلب البيانات إليه؛

2: رقم شنومكس هو رقم العمود الذي تعاد قيمته المطابقة؛

,: الفاصلة هي الفاصل الذي تريد فصل قيم متعددة.

يمكنك تغييرها حسب حاجتك.


عرض قيم بحث متعددة في خلية مفصولة بفواصل واحدة مع كوتولس فور إكسيل


إذا كان لديك كوتولس ل إكسيل، فإن هذه المهمة لم تعد مشكلة. ال متقدمة الجمع بين الصفوف قد تساعدك الأداة المساعدة على دمج كل القيم النسبية استنادا إلى عمود.

كوتولس ل إكسيل : مع أكثر من شنومكس مفيد اكسل الإضافية، مجانا في محاولة مع عدم وجود قيود في أيام شنومك.

بعد تثبيت كوتولس ل إكسيل، يرجى القيام بما يلي:

1. حدد نطاق البيانات الذي تريد الجمع بين كل القيم المطابقة استنادا إلى عمود.

2. انقر Kutools > المحتوى > متقدمة الجمع بين الصفوف، انظر الصورة:

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

3. في الجمع بين الصفوف استنادا إلى العمود مربع الحوار، انقر فوق اسم العمود الذي تريد الجمع استنادا إلى، ثم انقر فوق المفتاح الأساسي زر، انظر الصورة:

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

4. ثم انقر فوق اسم العمود الآخر الذي تريد الجمع بين القيم المتطابقة، وانقر فوق دمج لاختيار فاصل واحد لفصل القيم مجتمعة، انظر الصورة:

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

5. ثم اضغط OK زر، تم الجمع بين جميع الخلايا المقابلة مع نفس القيمة في خلية واحدة التي يتم فصلها مع الفاصلة، انظر لقطات:

دوك إرجاع قيم متعددة مفصولة بفواصل شنومكس  2 دوك إرجاع قيم متعددة مفصولة بفواصل شنومكس

انقر لمعرفة المزيد من التفاصيل حول أداة المساعدة المجمعة هذه في الصفوف ...

تحميل وتجريبية مجانية كوتولس فور إكسيل الآن!


عرض: عودة قيم بحث متعددة في خلية مفصولة بفواصل واحدة مع كوتولس ل إكسيل

كوتولس ل إكسيل: مع أكثر من شنومكس مفيد اكسل الإضافية، مجانا في محاولة مع عدم وجود قيود في أيام شنومكس. تحميل وتجريبية مجانية الآن!


Kutools for Excel يحل معظم مشاكلك ، ويزيد من إنتاجيتك بنسبة 80٪

  • إعادة استخدام: إدراج بسرعة الصيغ المعقدة ، الرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة المرور إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
  • سوبر الفورمولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (بسهولة قراءة وتحرير أعداد كبيرة من الخلايا) ؛ لصق على المدى المصفى...
  • دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ انقسام خلايا المحتوى ؛ الجمع بين تكرار الصفوف / الأعمدة... منع الخلايا المكررة. مقارنة النطاقات...
  • حدد تكرار أو فريد الصفوف. حدد صفوف فارغة (جميع الخلايا فارغة) ؛ سوبر البحث والعثور غامض في العديد من المصنفات ؛ اختيار عشوائي ...
  • نسخة طبق الأصل خلايا متعددة دون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة. إدراج الرصاصات، مربعات الاختيار والمزيد ...
  • استخراج النص، إضافة نص ، حذف حسب الموضع ، إزالة الفضاء. إنشاء وطباعة مجاميع ترحيل الصفحات ؛ تحويل بين محتوى الخلايا والتعليقات...
  • سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ تصنيف متقدم حسب الشهر / الأسبوع / اليوم ، التردد وأكثر ؛ فلتر خاص بواسطة جريئة ، مائل ...
  • الجمع بين المصنفات وأوراق العمل. دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; دفعة تحويل XLS ، XLSX وقوات الدفاع الشعبي...
  • أكثر من ميزات 300 القوية. يدعم Office / Excel 2007-2019 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. ميزات كاملة النسخة التجريبية المجانية من 30.
علامة التبويب kte 201905

علامة تبويب Office توفر واجهة مبوبة لـ Office ، واجعل عملك أسهل بكثير

  • تمكين تحرير علامات التبويب والقراءة في Word و Excel و PowerPointوالناشر والوصول ، Visio ومشروع.
  • افتح مستندات متعددة وقم بإنشائها في علامات تبويب جديدة لنفس النافذة ، وليس في نوافذ جديدة.
  • يزيد إنتاجيتك بنسبة 50٪ ، ويقلل مئات نقرات الماوس لك كل يوم!
أسفل مكتبه
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Js · 1 years ago
    VB command breaks when the range is longer than 154 rows (ie :B154)....
  • To post as a guest, your comment is unpublished.
    M Macklam · 1 years ago
    thank you, firstly i managed to get this to work without the slow down in performance. I'm using values rather that text so my question is i want to bring back all those with less than say 19 points in a list. Can the single cell Extract work for that or does it have to be a specific value?
  • To post as a guest, your comment is unpublished.
    A Ward · 1 years ago
    This simply does not work. I was unable to get it to work in my own application, so I copy/pasted the vba and the formula and it returned an error every time
  • To post as a guest, your comment is unpublished.
    K Ray · 2 years ago
    This works but slows down my excel majorly! Any tips to help speed?
  • To post as a guest, your comment is unpublished.
    Guest · 2 years ago
    Thanks for this post. Do you know how I would go about manipulating the two separate integers this is creating. For example, lets say that the '=SingleCellExtract' function now produces (1 , 2). Is there a way to have a cell next to it that does (1+.5 , 2+.5)?
  • To post as a guest, your comment is unpublished.
    GANGADHAR · 2 years ago
    WHile iam going to paste and save the module ,there is a pop-up message appears that significant loss of functionality compatibility checker