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

or

كيفية تحديد عناصر متعددة من القائمة المنسدلة في خلية في Excel؟

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

doc حدد عناصر متعددة من القائمة المنسدلة 1 دوك سهم لليمين doc حدد عناصر متعددة من القائمة المنسدلة 2

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

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

لنفترض أنك تعمل مع ورقة عمل تحتوي على عدة سجلات مكررة، والآن تحتاج إلى دمج / دمج الصفوف بناء على نفس القيمة وإجراء بعض العمليات الحسابية مثل سوم ومتوسط ​​وعدد الصفوف المكررة. مع هذا متقدمة الجمع بين الصفوف of كوتولس ل إكسيل، يمكنك الجمع بسرعة بين نفس القيم / نفس البيانات أو الصفوف المكررة في الخلايا المناسبة. انقر لمدة شنومك أيام تجريبية مجانية!
دوك المتقدمة الصفوف الجمع
كوتولس ل إكسيل: مع أكثر من شنومكس مفيد اكسل الإضافية، مجانا في محاولة مع عدم وجود قيود في أيام شنومك.

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


هنا بعض VBA يمكن أن يكون لك معروفا في حل هذه المهمة.

حدد العناصر المكررة من القائمة المنسدلة في خلية

1. بعد إنشاء قائمة منسدلة ، انقر بزر الماوس الأيمن على علامة تبويب الورقة لتحديدها عرض الرمز من قائمة السياق.
doc حدد عناصر متعددة من القائمة المنسدلة 3

2. ثم في ميكروسوفت فيسوال باسيك للتطبيقات نافذة ، نسخ ولصق تحت الرمز إلى البرنامج النصي فارغة.

VBA: حدد عناصر متعددة من القائمة المنسدلة في خلية

Private Sub Worksheet_Change (ByVal Target As Range) 'UpdatebyExtendoffice20180510 Dim xRgVal As Range Dim xStrNew As String On Error Resume Next Set xRgVal = Cells.SpecialCells (xlCellTypeAllValidation) If (Target.Count> 1) Or (xRgVal Is Nothing) Then Exit Sub If Intersect (الهدف ، xRgVal) هو لا شيء ثم إنهاء Sub Application.EnableEvents = False xStrNew = Target.Value Application.Undo xStrNew = xStrNew & "" & Target.Value Target.Value = xStrNew Application.EnableEvents = True End Sub

doc حدد عناصر متعددة من القائمة المنسدلة 4

3. احفظ الرمز وأغلق النافذة للعودة إلى القائمة المنسدلة. الآن يمكنك تحديد عناصر متعددة من القائمة المنسدلة.

ملاحظة:

1. مع VBA ، فإنه يفصل العناصر حسب المساحة ، يمكنك تغيير xStrNew = xStrNew & "" & قيمة الهدف للآخرين لتغيير محدد ما تحتاج إليه. فمثلا، xStrNew = xStrNew & "،" & قيمة الهدف سيفصل العناصر بفواصل.

2. يعمل رمز VBA هذا على كافة القوائم المنسدلة في الورقة.

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

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

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

Private Sub Worksheet_Change (ByVal Target As Range) 'UpdatebyExtendoffice20180510 Dim Dim as Integer Dim xRgVal As Range Dim xStrNew As String Dim xStrOld As String Dim xFlag As Boolean Dim xArr On Error Resume Next Set xRgVal = Cells.SpecialCells (xlCellTypeAllValidation) If (Target. Count> 1) أو (xRgVal Is Nothing) ثم Exit Sub If Intersect (الهدف ، xRgVal) هو لا شيء ثم قم بإنهاء Sub Application.EnableEvents = False xFlag = True xStrNew = "" و Target.Value & "" Application.Undo xStrOld = الهدف .Value If InStr (1 ، xStrOld ، xStrNew) = 0 ثم xStrNew = xStrNew & xStrOld & "" Else xStrNew = xStrOld End If Target.Value = xStrNew Application.EnableEvents = True End Sub


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.
    John · 2 months ago
    How would you apply this functionality but making it so that there aren't redundant values? Any help would be appreciated!
  • To post as a guest, your comment is unpublished.
    Madhu · 3 months ago
    I used this "Select multiple items from drop down list to a cell without repeat"
    this is what happened
    1. Multiple selections happen without problems.
    2. The issue is when i try to edit and remove an option. There is no way for me to remove an option. it keeps multiplying.
  • To post as a guest, your comment is unpublished.
    debadeep · 4 months ago
    After adding,the data from dropdown,delete doesnt work.
    • To post as a guest, your comment is unpublished.
      Susan Lynn · 4 months ago
      I found the same issue. I think I found a way to overcome it. At the bottom of the code you'll see the code "xStrNew = xStrOld". Instead, make it say xStrNew = " "

      It works for me.