كيفية توليد أرقام اليانصيب في Excel؟
هل فكرت يومًا في إنشاء أرقام يانصيب في Excel ، أو إنشاء مولد أرقام يانصيب في Excel بنفسك؟ في هذه المقالة ، أقدم لك ثلاث طرق لإنجازها بسهولة.
- قم بإنشاء أرقام يانصيب باستخدام وظائف Excel (5 خطوات)
- قم بإنشاء أرقام يانصيب باستخدام VBA Macro
- توليد أرقام اليانصيب مع كوتولس ل إكسيل (2 خطوات)
قم بإنشاء أرقام يانصيب باستخدام وظائف Excel
ستوجهك هذه الطريقة خلال تطبيق العديد من وظائف Excel لإنشاء أرقام يانصيب. ويمكنك القيام بما يلي:
1. في ورقة عمل فارغة ، اكتب رؤوس الأعمدة في النطاق A1: C1 كما هو موضح أدناه لقطة الشاشة:
2. أدخل الصيغ في العمود A والعمود B والعمود C:
(شنومكس) في الخلية A1 ، أدخل الصيغة = راند ()، ثم اسحب مقبض التعبئة إلى النطاق A2: A50.
(شنومكس) في الخلية بكسنومكس ، أدخل الصيغة =RANK($A2,$A$2:$A$50)+COUNTIF(B$1:B1,B1)-1، ثم اسحب مقبض التعبئة إلى النطاق B2: B50. (في الصيغة ، A2 هو الرقم العشوائي المتبقي للخلية الحالية ، $ A $ 2: $ A $ 50 هي جميع الأرقام العشوائية التي حصلنا عليها من الصيغة الأولى ، B $ 1 هي الخلية الأولى في العمود B ، و B1 هي الخلية الموجودة أعلى الحالي زنزانة).
(3) في النطاق C2: C50 ، أدخل أرقام التسلسل من 1 إلى 49.
ثم ستحصل على طاولة كما هو موضح في لقطة الشاشة اليسرى:
الصيغة معقدة للغاية بحيث لا يمكن تذكرها؟ احفظ الصيغة كمدخل نص تلقائي لإعادة استخدامه بنقرة واحدة فقط في المستقبل! اقرأ أكثر… التجربة المجانية |
3. ابحث عن نطاق فارغ ، اكتب أرقام التسلسل أفقيًا في صف كما هو موضح أدناه لقطة الشاشة:
4. أسفل الرقم التسلسلي الأول 1 ، أدخل الصيغة = VLOOKUP (G1، $ B $ 1: $ C $ 50,2،XNUMX، FALSE) بداخله ، واسحب مقبض التعبئة إلى النطاق الذي تريده.
ملاحظات: في هذه الصيغة ، G1 هي الخلية ذات رقم التسلسل الأول 1 ، $ B $ 1: $ C $ 50 عبارة عن عمود الترتيب الفريد وعمود رقم الكرة ، 2 تعني العثور على قيم في العمود الثاني من النطاق $ B $ 1: $ C $ 50 .
ثم ستحصل على أرقام اليانصيب كما هو موضح أدناه:
5. إنه اختياري. لمنع تغيير أرقام اليانصيب تلقائيًا عند تحديث ورقة العمل الحالية ، يمكنك النقر فوق المعادلة > خيارات الحساب > كتيب.
سرد بسهولة كل مجموعة من عدة سلاسل من البيانات في Excel
كوتولس ل إكسيل سرد كافة المجموعات تم تصميم الأداة المساعدة لتعميم جميع المجموعات الممكنة من عدة سلاسل معينة من البيانات ، وإدراج هذه المجموعات في عمود كما هو موضح أدناه لقطة الشاشة.
كوتولس ل إكسيل - شحن برنامج Excel بأكثر من 300 أداة أساسية. استمتع بتجربة مجانية كاملة المواصفات لمدة 30 يومًا دون الحاجة إلى بطاقة ائتمان! احصل عليه الآن
قم بإنشاء أرقام يانصيب باستخدام VBA Macro
ستوجهك هذه الطريقة إلى تطبيق ماكرو VBA لإنشاء أرقام يانصيب في Excel. الرجاء القيام بما يلي:
1. صحافة قديم + F11 مفاتيح لفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.
2. انقر إدراج > وحدة لفتح نافذة وحدة جديدة ، ولصق رمز فبا التالي بداخلها:
VBA: مولد رقم اليانصيب في Excel
Sub LotteyCode()
Dim Rng As Range
Dim WorkRng As Range
Dim xNumbers(49) As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Out put to (single cell):", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.Range("A1")
For xIndex = 1 To 49
xNumbers(xIndex) = xIndex
Next
For xIndex = 1 To 6
xNum = 1 + Application.Round(Rnd * (49 - xIndex), 0)
WorkRng.Offset(0, xIndex - 1).Value = xNumbers(xNum)
xNumbers(xNum) = xNumbers(50 - xIndex)
Next
End Sub
3. اضغط على F5 مفتاح أو انقر فوق يجري زر لتشغيل هذا الماكرو VBA.
4. الآن في مربع الحوار المنبثق ، حدد خلية لإخراج أرقام اليانصيب ، وانقر فوق OK .
ثم سترى 6 أرقام يانصيب فريدة يتم إنشاؤها وعرضها في الخلايا المحددة.
توليد أرقام اليانصيب مع كوتولس ل إكسيل
إذا كان لديك Kutools for Excel مثبتًا ، فإن ملف أدخل بيانات عشوائية يمكن أن تساعدك الأداة المساعدة في إنشاء أرقام يانصيب في Excel مرة واحدة.
كوتولس ل إكسيل - مزود بأكثر من 300 أداة أساسية لبرنامج Excel. استمتع بتجربة مجانية كاملة المواصفات لمدة 30 يومًا دون الحاجة إلى بطاقة ائتمان! التحميل الان!
1. حدد 6 خلايا متجاورة ، مثل A1: F1 ، ثم انقر فوق ملف كوتولس > إدراج > أدخل بيانات عشوائية.
2. الآن يظهر مربع الحوار "إدراج بيانات عشوائية". اذهب إلى عدد صحيح علامة التبويب ، اكتب 1 in من نوع الصندوق 49 in إلى مربع ، تحقق من قيم فريدة الخيار، وانقر فوق OK زر. الآن سترى 6 أرقام يانصيب فريدة يتم إنشاؤها وعرضها في الخلايا المحددة على الفور.
كوتولس ل إكسيل - شحن برنامج Excel بأكثر من 300 أداة أساسية. استمتع بتجربة مجانية كاملة المواصفات لمدة 30 يومًا دون الحاجة إلى بطاقة ائتمان! احصل عليه الآن
عرض توضيحي: قم بإنشاء أرقام يانصيب باستخدام Kutools for Excel
مقالات ذات صلة:
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!