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

كيفية تصفية البيانات من تحديد القائمة المنسدلة في إكسيل؟

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

تصفية البيانات من تحديد القائمة المنسدلة في ورقة عمل واحدة مع الصيغ المساعدة

تصفية البيانات من تحديد القائمة المنسدلة في ورقتي عمل برمز VBA


تصفية البيانات من تحديد القائمة المنسدلة في ورقة عمل واحدة مع الصيغ المساعدة

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

1. أولاً ، أدخل القائمة المنسدلة. انقر فوق الخلية التي تريد إدراج القائمة المنسدلة فيها ، ثم انقر فوق البيانات > التحقق من صحة البيانات > التحقق من صحة البيانات، انظر لقطة الشاشة:

2. في خرجت التحقق من صحة البيانات مربع الحوار ، تحت الإعدادات علامة التبويب، حدد قائمة من السماح القائمة المنسدلة ، ثم انقر فوق لاختيار قائمة البيانات التي تريد إنشاء القائمة المنسدلة بناءً عليها ، انظر لقطة الشاشة:

3. ثم انقر فوق OK زر ، يتم إدراج القائمة المنسدلة مرة واحدة ، واختيار عنصر واحد من القائمة المنسدلة ، ثم أدخل هذه الصيغة: = ROWS (دولار A $ 2: A2) (A2 هي الخلية الأولى داخل العمود التي تحتوي على قيمة القائمة المنسدلة) في الخلية D2 ، ثم اسحب مقبض التعبئة لأسفل إلى الخلايا لتطبيق هذه الصيغة ، انظر الصورة:

4. استمر في إدخال هذه الصيغة: = IF (A2 = $ H $ 2، D2، "") في الخلية E2 ، ثم اسحب مقبض التعبئة لأسفل لملء هذه الصيغة ، انظر الصورة:

ملاحظات: في الصيغة أعلاه :A2 هي الخلية الأولى داخل العمود التي تحتوي على قيمة القائمة المنسدلة ,H2 هي الخلية حيث يتم وضع القائمة المنسدلة ، D2 هي الصيغة الأولى للعمود المساعد.

5. ثم اكتب هذه الصيغة: = IFERROR (صغير ($ E $ 2: $ E $ 17، D2)، "") في الخلية F2 ، ثم اسحب مقبض التعبئة لأسفل إلى الخلايا لملء هذه الصيغة ، انظر الصورة:

ملاحظات: في الصيغة أعلاه: E2: E17 هي خلايا الصيغة المساعدة الثانية ، D2 هي الخلية الأولى في عمود صيغة المساعد الأول.

6. بعد إدراج أعمدة الصيغة المساعدة ، يجب عليك إخراج النتيجة المصفاة في موقع آخر ، يرجى تطبيق هذه الصيغة: =IFERROR(INDEX($A$2:$C$17,$F2,COLUMNS($J$2:J2)),"") في الخلية J2 ، ثم اسحب مقبض التعبئة من J2 إلى L2 ، وتم استخراج السجل الأول للبيانات استنادًا إلى القائمة المنسدلة ، انظر الصورة:

ملاحظات: في الصيغة أعلاه: A2: C17 هي البيانات الأصلية التي تريد تصفيتها ، F2 هو عمود صيغة المساعد الثالث ، J2 هي الخلية حيث تريد إخراج نتيجة التصفية.

7. ثم استمر في سحب مقبض التعبئة لأسفل إلى الخلايا لعرض جميع السجلات المصفاة المقابلة ، انظر الصورة:

8. من الآن فصاعدًا ، عند تحديد عنصر واحد من القائمة المنسدلة ، يتم تصفية جميع الصفوف بناءً على هذا التحديد مرة واحدة ، انظر لقطة الشاشة:


تصفية البيانات من تحديد القائمة المنسدلة في ورقتي عمل برمز VBA

إذا كانت خلية القائمة المنسدلة في الورقة 1 والبيانات التي تمت تصفيتها في الورقة 2 ، عند اختيار عنصر واحد من القائمة المنسدلة ، سيتم تصفية ورقة أخرى. كيف يمكنك إنهاء هذه الوظيفة في Excel؟

قد تقدم لك شفرة فبا التالية معروفًا ، يرجى القيام بذلك على النحو التالي:

1. انقر بزر الماوس الأيمن فوق علامة تبويب الورقة التي تحتوي على خلية القائمة المنسدلة ، ثم اختر عرض الرمز من قائمة السياق ، في فتح Microsoft Visual Basic للتطبيقات نافذة ، انسخ والصق الكود التالي في الوحدة النمطية الفارغة:

كود فبا: تصفية البيانات من تحديد القائمة المنسدلة في ورقتين:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
    On Error Resume Next
    If Not Intersect(Range("A2"), Target) Is Nothing Then
        Application.EnableEvents = False
        If Range("A2").Value = "" Then
            Worksheets("Sheet2").ShowAllData
        Else
            Worksheets("Sheet2").Range("A2").AutoFilter 1, Range("A2").Value
        End If
        Application.EnableEvents = True
    End If
End Sub

ملاحظات: في الكود أعلاه: A2 هي الخلية التي تحتوي على القائمة المنسدلة ، و Sheet2 هي ورقة العمل التي تحتوي على البيانات التي تريد تصفيتها. الرقم 1 في البرنامج النصي: التصفية التلقائية 1 هو رقم العمود الذي تريد التصفية بناءً عليه. يمكنك تغييرها حسب حاجتك.

2. من الآن فصاعدًا ، عندما تحدد عنصرًا واحدًا من القائمة المنسدلة في الورقة 1 ، وسيتم تصفية البيانات المقابلة في الورقة 2 ، انظر لقطة الشاشة:

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

🤖 مساعد 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 (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
For me, the Formula =ROWS($A$2:A2) didn't workend! It always gave me "2" back. I had to put =ROWS($A2:A2), so without the second "$", in order to reproduce your result.
This comment was minimized by the moderator on the site
How do I add multiple drown down menus? For example,
If i wanted a drop down menu for Product and name?.
This comment was minimized by the moderator on the site
Hey Kev, wondering if you found an answer to your question here? I have been looking for a bit to no avail.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations