كيفية إنشاء جميع التوليفات لـ 3 أعمدة أو أكثر في Excel؟
لنفترض أن لدي 3 أعمدة من البيانات، وأريد إنشاء أو سرد جميع التوليفات للبيانات الموجودة في هذه الأعمدة الثلاثة كما هو موضح في لقطة الشاشة أدناه. هل لديك أي طرق جيدة لحل هذه المهمة في Excel؟
إنشاء جميع التوليفات بناءً على 3 أعمدة من البيانات باستخدام صيغة
إنشاء جميع التوليفات بناءً على 3 أعمدة أو أكثر من البيانات باستخدام كود VBA
إنشاء جميع التوليفات بناءً على 3 أعمدة أو أكثر من البيانات باستخدام ميزة رائعة
إنشاء جميع التوليفات بناءً على 3 أعمدة من البيانات باستخدام صيغة
يمكن للصيغة الطويلة التالية أن تساعد في سرد جميع التوليفات للأعمدة الثلاثة، يرجى القيام بما يلي:
1. انقر فوق خلية حيث تريد عرض النتيجة، ثم انسخ والصق الصيغة أدناه فيها:
ملاحظة: في هذه الصيغة: A2:A4، B2:B6، C2:C5 هي نطاقات البيانات التي تريد استخدامها.
2. بعد ذلك، اسحب مقبض التعبئة إلى الأسفل حتى يتم عرض خلايا فارغة، مما يعني أن جميع التوليفات للأعمدة الثلاثة قد تم سردها، انظر لقطة الشاشة:
إنشاء جميع التوليفات بناءً على 3 أعمدة أو أكثر من البيانات باستخدام كود VBA
قد تكون الصيغة الطويلة أعلاه معقدة بعض الشيء للاستخدام، إذا كان هناك بيانات متعددة الأعمدة تحتاج إلى الاستخدام، سيكون من الصعب تعديلها. هنا، سأقدم لك كود VBA للتعامل مع الأمر بسرعة.
1. اضغط مع الاستمرار على مفتاحي ALT + F11 لفتح نافذة Microsoft Visual Basic for Applications.
2. انقر فوق إدراج > وحدة، والصق الكود التالي في نافذة الوحدة.
كود VBA: إنشاء جميع التوليفات لـ 3 أعمدة أو أكثر
Sub ListAllCombinations()
'Updateby Extendoffice
Dim xDRg1, xDRg2, xDRg3 As Range
Dim xRg As Range
Dim xStr As String
Dim xFN1, xFN2, xFN3 As Integer
Dim xSV1, xSV2, xSV3 As String
Set xDRg1 = Range("A2:A4") 'First column data
Set xDRg2 = Range("B2:B6") 'Second column data
Set xDRg3 = Range("C2:C5") 'Third column data
xStr = "-" 'Separator
Set xRg = Range("E2") 'Output cell
For xFN1 = 1 To xDRg1.Count
xSV1 = xDRg1.Item(xFN1).Text
For xFN2 = 1 To xDRg2.Count
xSV2 = xDRg2.Item(xFN2).Text
For xFN3 = 1 To xDRg3.Count
xSV3 = xDRg3.Item(xFN3).Text
xRg.Value = xSV1 & xStr & xSV2 & xStr & xSV3
Set xRg = xRg.Offset(1, 0)
Next
Next
Next
End Sub
ملاحظة: في الكود أعلاه، A2:A4، B2:B6، C2:C5 هي نطاقات البيانات التي تريد استخدامها، E2 هي الخلية التي تريد وضع النتائج فيها. إذا كنت ترغب في الحصول على جميع التوليفات لأكثر من ثلاثة أعمدة، يرجى تغيير وإضافة معلمات أخرى إلى الكود حسب الحاجة.
3. بعد ذلك، اضغط على مفتاح F5 لتشغيل هذا الكود، وسيتم إنشاء جميع التوليفات للأعمدة الثلاثة أو أكثر دفعة واحدة، انظر لقطة الشاشة:
إنشاء جميع التوليفات بناءً على 3 أعمدة أو أكثر من البيانات باستخدام ميزة رائعة
إذا كان لديك Kutools لـ Excel، باستخدام ميزته القوية قائمة جميع التركيبات، يمكنك سرد جميع التوليفات للأعمدة المتعددة بسرعة وسهولة.
1. انقر فوق Kutools > إدراج > قائمة جميع التركيبات، انظر لقطة الشاشة:
2. في مربع الحوار قائمة جميع التركيبات، حدد بيانات الأعمدة والفواصل لسرد التوليفات كما هو موضح في لقطة الشاشة التالية:
3. بعد تحديد البيانات والفواصل، ثم انقر فوق زر موافق، في مربع الحوار التالي، حدد خلية لوضع النتيجة، انظر لقطة الشاشة:
4. وبعد ذلك، انقر فوق زر موافق، سيتم إنشاء جميع التوليفات فورًا كما هو موضح في لقطة الشاشة أدناه:
Kutools لـ Excel - قم بتعزيز Excel بأكثر من 300 أدوات أساسية. استمتع بميزات ذكاء اصطناعي مجانية بشكل دائم! احصل عليه الآن
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في Excel مع Kutools لـ Excel، واختبر الكفاءة كما لم يحدث من قبل. Kutools لـ Excel يقدم أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
Office Tab يقدم واجهة التبويب لـ Office، ويجعل عملك أسهل بكثير
- تمكين تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint.
- افتح وأنشئ عدة مستندات في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ منفصلة.
- يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات بالماوس يومياً!