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

ترتيب قائمة بشكل عشوائي في Excel (برنامج تعليمي سهل خطوة بخطوة)

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


فيديو: ترتيب قائمة عشوائية في Excel


قم بترتيب قائمة بالوظائف بشكل عشوائي

في هذا القسم ، سوف أعلمك كيفية خلط قائمة بوظائف Excel المضمنة.

قم بترتيب قائمة عشوائية باستخدام وظيفة RAND

يمكن لمستخدمي أي إصدار من إصدارات Excel فرز مجموعة البيانات الأصلية بشكل عشوائي باستخدام ملف RAND تعمل بمساعدة تصنيف حسب: الميزة ، يرجى اتباع الخطوات أدناه.

الخطوة 1: أدخل صيغة RAND

حدد الخلية المجاورة للخلية العلوية من القائمة التي ستختارها بشكل عشوائي ، وأدخل صيغة RAND أدناه ، ثم اضغط أدخل.

=RAND()

الخطوة 2: املأ صيغة RAND بالخلايا الأخرى

انقر نقرًا مزدوجًا فوق مقبض التعبئة (المربع الأخضر الصغير في الزاوية اليمنى السفلية) لخلية الصيغة لتطبيق الصيغة على الخلايا أدناه.

الخطوة 3: قم بفرز نتائج RAND لتبديل القائمة عشوائيًا

1. حدد B2: B8، القائمة التي تحتوي على صيغة RAND.

2. انقر على فرز وتصفية > الفرز من الأصغر إلى الأكبر في ال تحرير مجموعة على الصفحة الرئيسية علامة التبويب.

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

نتيجة

الآن يتم تعيين كافة لك! القائمة عشوائية كما هو موضح أدناه.

ملحوظة:وظيفة Excel RAND متقلب: يعيد حساب نتيجته على كل تغيير في ورقة العمل. لذلك ، تغيرت الأرقام الموجودة في العمود B على الفور بعد الفرز. إذا كنت تريد تبديل القائمة مرة أخرى ، كرر ما سبق خطوة 3. خلاف ذلك ، يمكنك ببساطة حذف العمود باستخدام وظيفة RAND.
ترتيب قائمة باستخدام وظائف RANDARRAY و SORTBY و ROWS عشوائيًا (Excel 365/2021)

إذا كنت من مستخدمي إصدارات Excel الأحدث ، على سبيل المثال ، Excel for Microsoft 365 أو Excel 2021 أو Excel للويب ، رانداري, صنف حسب و ROWS ستساعدك الصيغة في الحصول على قائمة مختلطة بسرعة في الموضع الذي حددته.

الخطوة 1: أدخل صيغة RANDARRAY و SORTBY و ROWS

حدد خلية فارغة حيث تريد الحصول على النتيجة العشوائية ، اكتب الصيغة أدناه (لاحظ أنه يجب عليك التغيير A2: A8 في الصيغة أدناه إلى القائمة الأصلية التي تريد ترتيبها عشوائيًا) واضغط أدخل.

=SORTBY(A2:A8,RANDARRAY(ROWS(A2:A8)))

ملحوظة:
  • #تسرب يتم إرجاع الأخطاء عند نطاق الانسكاب (B2: B8 في هذه الحالة) لأن الصيغة ليست فارغة.
  • الصيغة متقلبة: فهي تعيد حساب نتيجتها في كل تغيير في ورقة العمل. إذا كنت تريد تبديل القائمة عشوائيًا مرة أخرى ، فاضغط على F9.
  • نتيجة الصيغة (قائمة عشوائية) غير قابلة للتحرير. إذا كنت بحاجة إلى تعديل القائمة العشوائية ، فاتبع الخطوة التالية.

(اختياري) الخطوة 2: انسخ نتيجة الصيغة والصقها لجعلها قابلة للتحرير

إذا كنت تريد فقط رؤية نتيجة عشوائية ، فيمكنك ذلك تخطي هذه الخطوة. إذا كنت تريد تحرير القائمة التي تم خلطها عشوائيًا ، فيجب نسخ نتيجة الصيغة ولصق القيم فقط:

1. حدد نتيجة الصيغة واضغط CTRL + C لنسخه.

2. انقر بزر الماوس الأيمن فوق خلية حيث ستلصق النتيجة المنسوخة. (يمكنك أيضًا لصق القيمة في موقعها الأصلي.)

3. حدد لصق القيم فقط الخيار من قائمة النقر بزر الماوس الأيمن.

نتيجة

ستحصل الآن على قائمة مختلطة وقابلة للتعديل كما هو موضح أدناه.


قم بترتيب قائمة في Excel بشكل عشوائي باستخدام Kutools بنقرتين

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

أولاً ، حدد القائمة التي ستقوم بتبديلها عشوائيًا. ثم حدد كوتولس > الفترة (من ... إلى) > فرز / تحديد النطاق بشكل عشوائي. في النافذة المنبثقة فرز / تحديد النطاق بشكل عشوائي الحوار، حدد صفوف كاملة، ثم انقر فوق Ok.

ملحوظة:

قم بترتيب قائمة عشوائية باستخدام VBA

إذا كنت تفضل اختيار قائمة عشوائية باستخدام طريقة VBA ، فيرجى القيام بما يلي.

ملحوظة: لا يمكنك التراجع بعد تشغيل ماكرو VBA. لذلك ، قم بعمل نسخة من القائمة في مكان آخر في حال احتجت إلى البيانات الأصلية في المستقبل.

الخطوة 1: حدد القائمة التي ستقوم بتبديلها عشوائيًا

الخطوة 2: نسخ كود VBA إلى نافذة الوحدة النمطية

1. صحافة CTRL + F11 لفتح محرر VBA ، ثم انقر فوق إدراج > وحدة لفتح نافذة كود الوحدة النمطية.

2. انسخ والصق رمز فبا أدناه في نافذة الوحدة النمطية المفتوحة.

كود فبا: فرز قائمة عشوائية

Sub RandomSort()
'Update by ExtendOffice
Dim xRg As Range
Dim xNum, xF, xI As Integer
Dim xWSh, xAWSh As Worksheet
On Error Resume Next
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xAWSh = Application.ActiveSheet
Set xRg = ActiveWindow.RangeSelection
Set xWSh = Worksheets.Add
xNum = xRg.Count
For xF = xNum To 1 Step -1
    xI = WorksheetFunction.RandBetween(1, xF)
    xWSh.Range("A1").Value = xRg.Item(xI)
    xRg.Item(xI) = xRg.Item(xF)
    xRg.Item(xF) = xWSh.Range("A1")
Next
xWSh.Delete
Application.ScreenUpdating = True
Application.DisplayAlerts = True
End Sub

الخطوة 3: قم بتشغيل كود فبا

في نافذة الكود ، اضغط على F5 أو انقر فوق زر لتشغيل هذا الرمز.

نتيجة

ملحوظة: إذا كنت تريد ترتيب القائمة عشوائيًا مرة أخرى ، كرر ما سبق خطوة 3.
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations