KutoolsforOffice — حل واحد، خمس أدوات قوية.تحقيق المزيد بجهد أقل.

كيف تُدخل قيمًا عشوائية من قائمة بيانات في Excel؟

المؤلفكيليتاريخ التعديل

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

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

ملء القيم عشوائيًا من قائمة بيانات باستخدام الصيغ

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

✅ الصيغة 1: دوال INDEX + RANDBETWEEN

يُعد الجمع بين دالتَي INDEX وRANDBETWEEN طريقةً كلاسيكيةً متوفرةً في جميع إصدارات البرنامج لاختيار قيم عشوائية من قائمة، وهي مثالية لتوليد قيم عشوائية فردية أو متعددة بسرعة حين يُسمح بالتكرار—مثلما في أخذ العينات العشوائية أو إنشاء بيانات وهمية.

لاستخدام هذه الطريقة، انسخ أو أدخل الصيغة التالية في خلية فارغة (مثل B2)، ثم اسحب مقبض التعبئة لأسفل لتوليد العدد المطلوب من القيم العشوائية. تذكّر أن الصيغة تتضمّن دوالًا متقلبة (مثل RANDBETWEEN)، لذا ستتغيّر نتائجها تلقائيًا في كل مرة تُعاد فيها عملية حساب الورقة.

=INDEX($A$2:$A$15, RANDBETWEEN(1, COUNTA($A$2:$A$15)))

دالتي INDEX + RANDBETWEEN لملء القيم عشوائيًا

🔍 شرح تفصيلي لهذه الصيغة:
  • A2:A15: تمثّل قائمة القيم التي يمكنك الاختيار منها عشوائيًا.
  • COUNTA($A$2:$A$15): تحسب ديناميكيًا عدد العناصر في قائمتك، لضمان بقاء الصيغة فعّالة حتى لو تغيّر طول القائمة.
  • RANDBETWEEN(1، n): يُولِّد عددًا صحيحًا عشوائيًّا بين 1 وn (عدد العناصر في القائمة).
  • INDEX(range, number): يسترجع العنصر الموجود في الموضع الذي تحدده من قائمتك.

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

 

✅ الصيغة 2: دوال INDEX + RANDARRAY (Excel 365 / 2021+)

يُعد الجمع بين دالتَي INDEX وRANDARRAY خيارًا مثاليًا لمستخدمي Excel 365 وExcel 2021، حيث يستفيد هذا الأسلوب من المصفوفات الديناميكية لإنتاج مجموعات من الاختيارات العشوائية دفعة واحدة، مما يبسّط سير العمل عند الحاجة إلى توليد عدة اختيارات عشوائية في خطوة واحدة. وهو مفيدٌ بشكل خاص عندما تحتاج إلى عدد محدد من الاختيارات العشوائية بسرعة. ومع ذلك، وكما هو الحال مع الصيغة السابقة، لا يضمن هذا الأسلوب تفرّد النتائج داخل المجموعة.

لاستخدام هذا الحل، أدخل الصيغة في خلية فارغة، مثل B2، ثم اضغط علىEnter. بعد ذلك، سيقوم Excel تلقائيًا بـ«تفريغ» القيم العشوائية المولَّدة في الصفوف التالية. على سبيل المثال، تُخرِج الصيغة التالية 5 قيم عشوائية من القائمة:

=INDEX(A2:A15, RANDARRAY(5, 1, 1, COUNTA(A2:A15), TRUE))

دالتي INDEX + RANDARRAY لملء القيم عشوائيًا

🔍 شرح تفصيلي لهذه الصيغة:
  • A2:A15: قائمة البيانات المحددة للاختيار العشوائي.
  • COUNTA(A2:A15): يحسب عدد الإدخالات في القائمة المحددة.
  • RANDARRAY(5،1،1، COUNTA(...)، TRUE): يُنشئ خمسة أعدادٍ صحيحة عشوائية بين 1 والموضع الأخير في القائمة، ليُنتج مصفوفةً عمودية (مكونة من عمود واحد).
  • INDEX(A2:A15، …): يُربط كل رقم عشوائي بقيمة من قائمتك.

نصائح: إذا كنت بحاجة إلى عدد مختلف من القيم العشوائية، فما عليك سوى تعديل5 فيRANDARRAY(5,1، ...)وفقًا لذلك. وتذكّر دائمًا لصق النتائج كقيم إذا أردت أن تبقى ثابتة، لأن مخرجات الصيغة تتجدد تلقائيًا مع أي تغيير في الورقة.

💡نصائح: نظرًا لأن كلًّا من RANDBETWEEN وRANDARRAY هما دالتان متقلبتان (volatile)، فإن الناتج سيتجدد عند أي تغيير في ورقة العمل. ولحفظ لقطة ثابتة، انقل النتائج واستخدم خيار «لصق كقيم».

ملء القيم عشوائيًا من قائمة باستخدام VBA (حل متقدم وقابل للتخصيص)

إذا كنت بحاجة إلى أتمتة تعيين قيم عشوائية على نطاق واسع، أو منع تكرار الإدخالات، أو تتطلب مزيدًا من التخصيص—مثل تطبيق منطق معقد أثناء الاختيار—فإن أسلوب VBA (Visual Basic for Applications) هو الحل الأمثل. يمكّنك VBA من توليد اختيارات عشوائية فريدة حقًّا، وتطبيق منطق توزيع مخصص، وتكرار المهام بنقرة واحدة، مما يجعله مثاليًا للمحاكاة المتقدمة، والتخصيص العشوائي الآلي، والعمل مع مجموعات بيانات ضخمة.

هذا الحل مثالي للمستخدمين المتمرسين في استخدام الماكرو أو الراغبين في أتمتة سير عملهم في Excel.

1. افتح محرر VBA بالنقر علىالمطوّر > Visual Basic(أو اضغط على)Alt + F11)، وستفتح بذلك نافذةMicrosoft Visual Basic for Applications. بعد ذلك، انتقل إلىإدراج > وحدة نمطية، والصق الكود أدناه في نافذة الوحدة النمطية:

Sub RandomFillFromList_NoDuplicates()
    Dim srcRange As Range
    Dim destRange As Range
    Dim srcValues As Variant
    Dim destCount As Integer
    Dim usedIndexes As Object
    Dim i As Integer
    Dim randIndex As Integer
    
    On Error Resume Next
    Set srcRange = Application.InputBox("Select source list", "KutoolsforExcel", Type:=8)
    If srcRange Is Nothing Then Exit Sub
    
    Set destRange = Application.InputBox("Select destination range (number of random values to fill)", "KutoolsforExcel", Type:=8)
    If destRange Is Nothing Then Exit Sub
    
    srcValues = Application.Transpose(srcRange.Value)
    destCount = destRange.Cells.Count
    Set usedIndexes = CreateObject("Scripting.Dictionary")
    
    If UBound(srcValues) < destCount Then
        MsgBox "Not enough unique items in the source list to fill destination without duplicates.", vbExclamation, "KutoolsforExcel"
        Exit Sub
    End If
    
    Randomize
    For i = 1 To destCount
        Do
            randIndex = Int(Rnd() * UBound(srcValues)) + 1
        Loop While usedIndexes.Exists(randIndex)
        
        usedIndexes(randIndex) = True
        destRange.Cells(i).Value = srcValues(randIndex)
    Next
End Sub

2.شغّل الماكرو بالنقر على زرزر التشغيلفي شريط أدوات VBA. سيطلب منك الماكرو تحديد (أ) قائمة المصدر (النطاق الذي سيتم الاختيار منه)، و(ب) منطقة وضع القائمة (لتحديد عدد القيم العشوائية التي ترغب في استخراجها، اختر ببساطة عددًا مساويًا من الخلايا). ويضمن الكود أن تكون القيم في الناتج فريدة—بشرط أن تكون قائمة المصدر كبيرة كفاية. أما إذا لم تكن كذلك، فسيعرض لك تحذيرًا.

تتميز طريقة VBA هذه بالمزايا والاعتبارات التالية:

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

اختَر واملأ قيمًا عشوائيًّا من قائمة بيانات باستخدام Kutools لـ Excel (جميع الإصدارات)

Kutools لـ Excelيوفّر حلاً تفاعليًّا وسهل الاستخدام لاختيار وملء القيم عشوائيًّا من قائمة! وهو مثالي للمستخدمين الذين يرغبون في تنفيذ المهام العشوائية دون الحاجة إلى كتابة صيغ أو أكواد، وكذلك لأولئك الذين يحتاجون إلى معالجة كميات كبيرة من الاختيارات بأقل قدرٍ ممكن من الإدخال اليدوي. ويتيح لك Kutools التحكّم الكامل في الناتج—مثل تحديد عدد القيم المراد اختيارها—من خلال واجهة مربع حوار مباشرة وواضحة.

Kutools لـ Excelيقدّم أكثر من 300 ميزة متقدمة لتبسيط المهام المعقدة، مما يعزز الإبداع والكفاءة.مدمج مع إمكانات الذكاء الاصطناعي، يقوم Kutools بأتمتة المهام بدقة، مما يجعل إدارة البيانات سهلة بلا جهد.معلومات تفصيلية عن Kutools لـ Excel...         نسخة تجريبية مجانية...

بعد تثبيت Kutools لـ Excel، اتبع الخطوات التالية لاستخدام وظيفته المدمجة للاختيار العشوائي:

  1. حدد النطاق الذي يحتوي على القيم التي ترغب في اختيارها عشوائيًا.
  2. انقر علىKutools > نطاق > فرز أو اختيار أو عشوائي. راجع لقطة الشاشة أدناه:
    انقر على "فرز / تحديد نطاق عشوائي" من kutools
  3. في مربع حوارفرز أو اختيار أو عشوائي، انتقل إلى علامة التبويبتحديد، ثم قم بما يلي:
    • حدد عدد الخلايا التي ترغب في اختيارها عشوائيًا.
    • تأكد من اختيارك لخيارخليةضمننوع التحديد.
    • أخيرًا، انقر على زرموافق.
      تعيين الخيارات في مربع الحوار
  4. سيتم تحديد العدد المطلوب من الخلايا عشوائيًا. بعد ذلك، يمكنك نسخها ولصقها في أي مكان تريده حسب الحاجة.
    نسخ ولصق الخلايا العشوائية

بالإضافة إلى بساطتها، تجنّب طريقة Kutools الأخطاء الشائعة التي قد تحدث عند إجراء الاختيار العشوائي يدويًّا، ولا تتطلب أي معرفة مسبقة بصيغ Excel أو إعدادات الماكرو. إذا كنت ترغب في الحصول على قيم فريدة، فتأكد من أن قائمة المصدر تحتوي على عدد أكبر من العناصر مما تنوي اختياره، وراجع الخيارات المتاحة في مربع الحوار لتفعيل «الاختيار دون تكرار» إن كانت متوفرة.

🔚الخاتمة

يمكن إدارة ملء القيم عشوائيًّا من قائمة معرّفة مسبقًا في Excel بكفاءة باستخدام مجموعة متنوعة من التقنيات المناسبة لمستويات المعرفة والسيناريوهات المختلفة:

  • لجميع إصدارات Excel، تُعد صيغة INDEX مع RANDBETWEEN خيارًا سريعًا وموثوقًا لتوليد اختيارات عشوائية، خاصةً في القوائم التي يُسمح فيها بالتكرار.
  • إذا كنت تستخدم Excel 365 أو 2021، فإن الجمع بين RANDARRAY وINDEX يوفّر حلاً ديناميكيًا لاختيار مجموعات عمل، مما يُسرّع العمليات عند الحاجة إلى إنشاء العديد من النتائج دفعة واحدة.
  • للحالات التي تتطلب تخصيصًا عاليًا—مثل ضمان عدم التكرار، أو أتمتة تعيينات عشوائية على نطاق واسع، أو تطبيق منطق اختيار معقد—يوفّر لك أسلوب VBA أقصى درجات المرونة، رغم أن المستخدمين يجب أن يكونوا على دراية بتشغيل الماكرو.
  • إذا كنت تفضّل نهجًا خاليًا من البرمجة وسهل الاستخدام، فإن Kutools لـ Excel يُمكّنك من توليد اختيارات عشوائية عبر واجهة رسومية بديهية، مما يجعله مثاليًا للمبتدئين والمستخدمين المتقدمين على حدٍ سواء الذين يحتاجون إلى نتائج سريعة.

من المهم أن تأخذ في الاعتبار ما إذا كنت بحاجة إلى اختيارات فريدة أم يُسمح بالتكرار، وعدد العناصر العشوائية التي تحتاجها، ومدى راحتك في استخدام صيغ Excel أو الماكرو. قبل مشاركة النتائج العشوائية أو حفظها، استخدم ميزة «لصق كقيم» لتجنب إعادة الحساب غير المقصودة. وللمستخدمين المهتمين باستكشاف حلول Excel إضافية،يمكنكم زيارة قسم دروس Excel لدينا لمزيد من الأدلة والتلميحات العملية.

اقتراحات استكشاف الأخطاء وإصلاحها: تحقَّق مجددًا من دقة نطاقات القوائم، وانتبِه إلى إعادة الحساب عند استخدام الدوال المتقلبة (volatile functions)، وتأكد من أن إعدادات أمان الماكرو تسمح بتنفيذ VBA عند تطبيق الحلول القائمة على الكود. وإذا ظهرت أخطاء أثناء استخدام VBA—مثل صغر حجم قائمة المصدر—فتابع التعليمات الظاهرة على الشاشة وأعد مراجعة نطاقاتك.

مقالات ذات صلة:

اختيار خلايا عشوائيًّا بناءً على معايير في Excel

إضافة خلفية/تعبئة اللون عشوائيًّا للخلايا في Excel

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

🤖KUTOOLS AI مساعد: ثوّر تحليل البيانات استنادًا إلى:التنفيذ الذكي   |  إنشاء الكود|  إنشاء الصيغ المخصصة  |  تحليل البيانات وإنشاء المخططات البيانية|  استدعاء الوظائف المحسنة…
الميزات الشائعة:البحث، التمييز أو وضع علامة على المكررات   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |  التقريب بدون استخدام الصيغة...
بحث متقدم:VLookup متعدد المعايير  |  VLookup متعدد القيم  |   VLookup عبر أوراق متعددة   |   مطابقة غامضة....
قائمة منسدلة متقدمة:إنشاء قائمة منسدلة بسرعة   |  قائمة منسدلة تابعة   |  قائمة منسدلة متعددة الاختيار....
مدير الأعمدة:إضافة عدد محدد من الأعمدة|نقل الأعمدة|تبديل حالة ظهور الأعمدة المخفية|مقارنة النطاقات والأعمدة...
ميزات مميزة:التركيز على الشبكة   |  عرض التصميم   |شريط الصيغ المحسن   | مدير الدفتر والورقة   |  مكتبة الموارد(نص تلقائي)|  أداة اختيار التاريخ   |  تجميع ورقات العمل  |  تشفير/فك تشفير الخلايا   | إرسال رسائل البريد الإلكتروني حسب القائمة   |  مرشح متقدم   |   تصفية خاصة(تصفية الخلايا التي تحتوي على خط عريض/مائل/يتوسطه خط...) ...
أفضل 15 مجموعات الأدوات:12 أدواتالنصوص(إضافة نص،حذف الأحرف المحددة، ...)|   50+أنواعالمخططات البيانية(مخطط جانت، ...)|   40+ صيغعملية(حساب العمر بناءً على تاريخ الميلاد، ...)|   19 أدواتالإدراج(إدراج رمز QR،إدراج صورة من المسار، ...)|   12 أدواتالتحويل(تحويل إلى كلمات،تحويل العملة، ...)|   7 أدواتدمج وتقسيم(دمج متقدم للصفوف،تقسيم الخلايا، ...)|... وأكثر من ذلك
استخدم Kutools باللغة التي تفضلها – يدعم الإنجليزية والإسبانية والألمانية والفرنسية والصينية و40+ لغات أخرى!

عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...

يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير

  • تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
  • افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
  • يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!

جميع الإضافات من Kutools في برنامج تثبيت واحد!

Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.

ExcelWordOutlookTabsPowerPoint
  • حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
  • برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
  • يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
  • تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
  • أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل