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

التحكم فى تكرار الاسم فى الصف


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

الاساتذه الافاضل بعد التحيه

هل يمكن عمل داله تحكم فى توزيع الاسم على الصف الموجود فيه على حسب رقم التكرار الذى امامه بشكل عشوائى مثلا الاسم م1 امامه العدد المكرر 5 هل يمكن كتابه الاسم م1 5مرات بشكل عشوائى فى الصف

a2 مرفق مثال

شكرا لكم جودة

22222222.rar

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

ضع هذا الكود في حدث الصفحة


Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Count > 2 Then Exit Sub

If Target.Value = Empty Then Range(Cells(Target.Row, 4), Cells(Target.Row, 24)) = Empty: Exit Sub

If Not Intersect(Target, [C2:C50]) Is Nothing Then

Range(Cells(Target.Row, 4), Cells(Target.Row, 24)) = Empty

Range(Cells(Target.Row, 4), Cells(Target.Row, 3 + Val(Target))) = Target.Offset(0, -1)

End If

End Sub

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

الاساتذ عبد الله رائع وبارك الله فيك واسمح لى بتكمله الموضوع

سنفرض مثلا ان اسم م1 فى الخليه a1 ., a2 هل يمكن التحكم فى اثناء التوزيع ان لايمكن ان يكون اى اسم مكرر فى نفس العمود اى اذا وجد م1 فى عمود لايمكن ان يتكرر فى نفس العمود مثل الجدول المدرسى

ثانيا هل يمكن التحكم فى مدى الخلايا مثلا ان نعطيه امر بان يتم التوزيع من a2 ; b2 يقوم بالتوزيع 3 مرات وهكذا

اسف للاطاله ولك منى كل تقدير

جوده

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

بصراحة اخي جودة لم افهم المطلوب

ارفق ملف به النتيجة المطلوبة من التوزيع وان كنت قادر على الحل ان شاء الله انا في الخدمة

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

الاستاذ عبدالله

تحيه وشكر وتقدير

اسمح بعاده عرض المطلو ب واعذرنى فى الخطا فى عرضه سابقا

الموضوع مثل الجدول المدرسى مثلا م 1 نريد تكراره 3 مرات يوم السبت 2مره يوم الاحد

واذا تكرر الاسم م1 فى الصف الذى يليه لابد ان لايتكرر راسيا اى فى عمود واحد اسمان متشابهان وشكرا

22222222.rar

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

السلام عليكم

هذا الكود خلاصة عدد كبير من المحاولات والجهد

جربه ان شاء الله يكون ما طلبت

للعلم اذا بلغ عدد مجموع تكرار اي اسم اكبر من 21 (عدد الخانات المتاحة للتوزيع ) سيتم ايقاف التوزيع وظهور رسالة تنبهك بالاسم المتجاوز

22222222.rar

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

الاخ عبد الله ارجو ان تسمح لى بسؤال

كيف يمكن التحكم فى المدى صفوف واعمده مثال اذا اردت ذياده الايام الى الخميس مثلا.و كذالك راسيا (ان امكن شرح هذا الكود الخطير ) :fff::gift2::rol:

شكرا للك جوده

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

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



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

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

Important Information