اذهب الي المحتوي
أوفيسنا

إختيار الفائز فى أحدى المسابقات بشكل عشوائى


الردود الموصى بها

بسم الله الرحمن الرحيم

اليوم سنتعلم معاً طريقة إختيار الفائز فى أحدى المسابقات بشكل عشوائى، وذلك من خلال إستخدام الدوال Randbetween و الدالة Vlookup و الدالة IF
النتيجة النهائية
winners.gif

مثال : لدينا 11 متسابق مرشحين للفوز بالجائزة كالتالى
winners-01.png
المطلوب : أختيار أحد المتسابقين بشكل عشوائى للفوز بالجائزة

من أجل تحديد الفائز بشكل عشوائى سنقوم بإستخدام المعادلة التالية فى الخلية المراد إظهار إسم الفائز بها
winners-02.png
ملاحظات على المعادلة السابقة
1 » الجزء المكتوب باللون الأحمر هو المسئول عن توليد الأرقام بشكل عشوائى وذلك بين الرقمين 1 و 11، ويمثل قيمة البحث فى الدالة Vlookup
2 » الجزء المكتوب باللون الأخضر يشير إلى منطقة البحث والتى يوجد بها القيمة المراد إستخراجها
3 » الجزء المكتوب باللون البنفسجى يشير لرقم العمود فى منطقة البحث
4 » الجزء المكتوب باللون البرتقالى يبين للدالة Vlookup أننا نريد مطابقة لقيمة البحث

الأن إذا أردت من أن الدالة تعمل بشكل صحيح نضغط على الزر F9 ستجد أن النتيجة تتغير مع كل ضغطة، وذلك لأننا بالضغط على الزر F9 فإننا نقوم بعمل Recalculate Workbook وهو ما يؤدى إلى قيام الدالة Randbetween بتوليد جديد

فى حالة أننا نريد أن نضبط الدالة السابقة فى حالة تحقق شرط معين وهو إختيار Start وتتوقف الدالة عند إختيار Stop فإننا سنقوم بإستخدام الدالة IF كالتالى
winners-03.png
فى المعادلة السابقة نجد الأتى :
1 » الجزء المكتوب باللون الأخضر هو الشرط الخاص بالدالة IF والذى به سنعرف هل الخلية E2 بها Start
2 » الجزء المكتوب باللون الأزرق هى الدالة السابق كتابتها وهى تمثصل النتيجة التى ستظهرها الدالة If فى حالة تحقق الشرط
3 » علامتى التنصيص باللون الأحمر تعنى أن تكون الخلية فارغة فى حالة عدم تحقق الشرط

ملحوظة عامة : يعيب هذه الطريقة أننا إذا أردنا إظهار أكثر من فائز فقد يتكرر نفس الشخص أكثر من مرة

شرح الدوال المستخدمة فى الموضوع
1 » الدالة Randbetween
2 » الدالة Vlookup

لا تنسونا من خالص دعائكم | إدعوا لى بالتوفيق فى الإمتحانات

والسلام عليكم ورحمة الله وبركاته

المصدر : مدونة المعتصم بالله


رابط هذا التعليق
شارك

شكرا أخي المعتصم على هذا الموضوع

لدي برنامج يقوم بخلط أسماء المترشحين وتعيين الفائز

للأمانة الملف منقول وهو نوع أكسس

الرابط هنا

http://www.mediafire.com/?nbizdnjfmkx

ملاحظة / خاصية المرفقات لا تعمل

رابط هذا التعليق
شارك

جميل وبديع

بارك الله فيك

هل مكن أن نمنع تكرار الفائز قبل أن يكون الجميع قد فازوا ؟؟

أى لا يفوز شخص مرتين قبل أن يكون الجميع قد فازو مرة

وهل يمكن ضبط الفائزين على جائزتان ؟؟ أى شخصين كل مرة ؟؟

عل كل حال مشكوووووووووور

كما أهنئك على روعة العرض المتحرك

رابط هذا التعليق
شارك

السلام عليكم ورحمة الله وبركاته

سؤال أخي معتصم أرجو أن أجد عندك الإجابة

هل يمكن تطويع هذه الدالة مع " طلب كنت طلبته في هذا المنتدى ولم أجد فيه حلا وهو على الرابط " اطلب فيه هل يوجد دالة للتوزيع العشوائي

http://www.officena.net/ib/index.php?showtopic=28826

أرجو أن أجد عنك الحل بارك الله بك

رابط هذا التعليق
شارك

سالم شباني : ما قمت به هو فكرة لدمج الدوال ببعضها البعض من أجل إتمام عملية بسيطة

يوسف عطا : للأسف هذه الطريقة كما ذكرت فى الموضوع أنها يعيبها إمكانية تكرار البند أكثر من مرة
لكن هناك دالة تقوم بتوليد الأرقام عشوائياً دون تكرار (الدالة عبارة عن إضافة ضمن 63 دالة أخرى)

m_127899
للأسف لا أعتقد إمكانية تطبيق الطريقة المذكروة هنا على مثالك لأنه سينشا تكرار فى الأسماء

الملف مرفق

Select_winner.rar

رابط هذا التعليق
شارك


أستاذ / أبو تامر
أعتذر عن هذا الخطأ غير المقصود، وهذا هو التوضيح الخاص بإضافة الـ Analysis ToolPack
إكسل 2003
لإستخدام هذه الدالة Randbetween فى نسخة 2003 لابد من القيام بالأتى لكى تُفعل الدالة :
1 » نذهب إلى Tools » Add-Ins
2 » نُحدد Analysis ToolPack
generate-numbers-08.png
3 » الأن الدالة Randbetween جاهزة للعمل … ألف مبروك !
تم تعديل بواسطه al m3tasem
رابط هذا التعليق
شارك

شكراُ لك أخي المعتصم على موضوعك

و للإفادة يمكننا الاستغناء عن RandBetween و استخدام بدلاً منها Rand

و ايضاً يمكننا إستخدام الدالة Index with Match

و ربطها مع عدد آخر من الدوال

و هذا رابط مشاركة شبيهة للموضوع

http://www.officena.net/ib/index.php?showtopic=28445&hl=

و دمتم في حفظ الله و رعايته

رابط هذا التعليق
شارك

  • 3 years later...

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

 

مثال.rar

رابط هذا التعليق
شارك

S6hT2.gif

الاخ الكريم / احب العلم

 

بارك الله فيك

واهلا بك بين اخوانك في هذا الصرح العملاق

وان شاء الله ستسعد جدا بالانضمام الي هذا الصرح

ولكن اولا طلبك ليس في مكانه ... والافضل لتجد الاجابات علي سؤالك

هو ان تقوم بعمل موضوع جديد .. فيه طلبك ... ليشاهدة الجميع

ومبدئيا شاهد الرابط التالي ... عله يفيدك ان شاء الله

http://www.officena.net/ib/index.php?showtopic=46421&hl=%D8%A7%D9%84%D8%AD%D8%B1%D9%88%D9%81

جزاك الله خيرا

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information