اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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

قام بنشر

اخي هشام

الله يعطيك العافية و يرزقك الجنة ونعيمها

واضح جدا تعبك في الموضوع و شغلك الطويل علية

واتمنى لو كنت استطيع مساعدتك في انجازة

ولكن

كما يقال

اعطي القوس باريها

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

قام بنشر

iهذا ما اتمناه استاذ هشام جزاك الله خيرا

شكررا شكرا شكرا لك اخي فيى الله استاذي الاستاذ هشام شلبي

على هذا المجهود والتعب والمتابعه معي

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

قام بنشر

السلام عليكم

===========

اخى مصطفى

بارك الله فيك على هذا المجهود المميز والفكر الجميل فى شيتك

ولكن لاحظت ان هناك خطأ فى التوزيع انظر الى الصفحة الاولى بعد التوزيع

ستجد طالب خارج عن التوزيع

تقريبا رقمه 109 لاحظت ذلك اليوم صباحا

مش عارف الملاحظة دى صح ولا خطأ منتظر ردك

وموعدنا بعد انتهاء موعد العمل حيث اليوم هو اول ايام امتحانات الدور الثانى

قام بنشر

استاذ هشام بارك الله فيك علي هذا الاهتمام

ولكن لم اري شياء عندي واري الملف شغال تمام

وتم المراجعه علي كل ارقام الجلوس والرجوع الي البيانات الاساسية

اريها تماما ولن اري تغير

ولكن استاذ هشام عندي اقتراح لي بعد اذنك

حين اقوم بضرب اللجان واضع 23 من الطلاب فى كل لجنة يتم التوزيع ولن يوجد خطأ

ما هو الخطأ :

الخطأ هو ان فى اللجنة الاولة يوجد بة 23 طالب واللجنة الثانية يوجد بها 2 , 3 , 4 , 5 , 6 ,يوجدعدد الطلاب بها 22

ولجنه 7 يوجد بها عدد الطلاب 17 وهكذا لم يتم التوزيع مطابقا لما اريد

وما هو قصدي لتوزيع اللجان حيث يتم التوزيع مظبوطا

يوجد لدي 150 اريد ان اضع فى كل لجنة 23 طالبا يتم توزيعهم علي 7 لجان 1 , 2 , 3 , 4 , 5 , 6 يوجد بكل لجنة 23

و لجنة 7 يوجد بها 12 طالب فقط حسب التوزيع الموجود عندي

يبقي لو قمنا بضرب 6 لجان فى 6 اصبح الناتج 135 ويوجد بالجنة 7 12 طالب يبقي العدد كدة مظبوط 150

كل قصدي من هذا هو حين ما اقوم بتوزيع الطلاب علي اللجان وقمت بتحديد 20 طالبا فى كل لجنة يتم التوزيع على كل اللجان

20 طالبا وفي اخر لجنة يكون الطلاب الاخرون بها كما عددهم وهم دائما بيبقي اصغر رقم باللجان

وشكرا لمتابعتك معي وجزاك الله خيرا استاذ هشام

قام بنشر

السلام عليكم

===========

المشكلة الاولى فى طريقها للحل ان شاء الله

اما بخصوص المرفق

شاهد جزء واحد فقط الان على CheckBox1 اذا كان هو طلبك نكمل او تكمل انت او كما تشاء

الكود المستخدم هو

Private Sub CheckBox1_Click()

If CheckBox1.Value = True Then

    Selection.Locked = False

    Range("E7:E1000").Select

    Selection.Locked = True

    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True

ElseIf CheckBox1.Value = False Then

ActiveSheet.Unprotect

End If

End Sub

رصد نصف العام.rar

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