كل مجموعه برقم موحد

[يوسف_2023]

السلام عليكم

دى اول مشاركه لى فى المنتدى

كنت بشتغل على برنامج كنترول شيت واردت عمل لجان للطلاب

المطلوب : فى المرفق جدول به ثلاث حقول 

المطلوب فى الحقل الثالث tarkeem 

كل 22 طالب ياخدوا رقم موحد برمجيا

مثلا اول 22 طالب ياخدو رقم 1 .. وثانى 22 طالب ياخدوا رقم 2  الخ

اشكركم اعزائى

ترقيم مجموعه.accdb

[يوسف_2023]

للرفج ... جزاكم الله خيرا

[Barna]

ابحث في المنتدى هناك الكثير من طرق توزيع الطلاب على اللجان .....

في ١٧‏/١١‏/٢٠١٥ at 23:42, أحمد الفلاحجى said:

اتفضل اخى الكريم 

هذا مثال قد حصلت عليه من منتدى الفريق العربى لاحد الاخوه وبه تعديلات على ما اعتقد انها لاختنا الكريمه زهره بارك الله فيها وجزاها الله عنا خير الجزاء

ان شاء الله تستفيد منه 

بالتوفيق 

اسلوب التوزبع3.rar

 

[عفرنس]

34 دقائق مضت, Barna said:

ابحث في المنتدى هناك الكثير من طرق توزيع الطلاب على اللجان .....

 

حمدا لله على السلامة اخي محمد Barna

[Barna]

16 ساعات مضت, فايز.. said:

حمدا لله على السلامة اخي محمد Barna

الله يسلمك من كل شر أخي الفاضل فايز ..... مشاغل الدنيا ... الله لا يشغلنا الا بطاعته ....

[يوسف_2023]

اخى العزيز ...   Barna  اشكرك جدا

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

اسف جدا ... هل يمكن ضبط ملفى المرفق فى المشاركه الاولى

تم تعديل مارس 30, 2020 بواسطه يوسف ابوسمره

[Barna]

3 ساعات مضت, يوسف ابوسمره said:

اخى العزيز ...   Barna  اشكرك جدا

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

اسف جدا ... هل يمكن ضبط ملفى المرفق فى المشاركه الاولى

ولا يهمك .....

تفضل واعلمنا بالنتيجة .....

 

ترقيم مجموعه (1).accdb

[يوسف_2023]

6 ساعات مضت, Barna said:

ولا يهمك .....

تفضل واعلمنا بالنتيجة .....

 

ترقيم مجموعه (1).accdb 448 kB · 17 تنزيلات

عند التجربه وجدت كود التوزيع ... يعطى جميع الطلاب رقم واحد ... وليس كل مجموعه برقم

[Barna]

أخي الكريم .... تابع الشرح ونفذ ....

 

حسب طلبك كل 22 سجل برقم معين ...... اليس هذا هو المطلوب ؟؟؟؟؟؟

[rey360]

أخ يوسف ابوسمره عدد الطلاب هو العدد الذي تريده في كل مجموع وليس العدد الاجمالي لطلاب الموجودين عندك

[يوسف_2023]

نعم اخى العزيز ... سامحنى ... انا كنت بسجل عدد جميع الطلاب فى خليه عدد الطلاب .. وفى عدد المجموعات كنت بسجل 22 

لكن بعد تطبيق الشرح ... لقيت كل حاجه تمام ....اشكرك يا غالى .... وزادك الله من علمه

مجرد استفسار بسيط هل من الممكن ان يتم حساب عدد المجموعات أليا

6 ساعات مضت, rey360 said:

أخ يوسف ابوسمره عدد الطلاب هو العدد الذي تريده في كل مجموع وليس العدد الاجمالي لطلاب الموجودين عندك

بالفعل كلامك صحيح ..اعذرنى انا كنت بنفذ المدخلات خطأ ... جزاك الله خيرا وعفانا وعافاك الله من كل مكروه وسوء

تم تعديل مارس 31, 2020 بواسطه يوسف ابوسمره

[Barna]

37 دقائق مضت, يوسف ابوسمره said:

 

مجرد استفسار بسيط هل من الممكن ان يتم حساب عدد المجموعات أليا

كيف اليا ... هل تقصد عدم كتابة عدد الطلاب والمجموعات ؟؟؟؟

[أبوبسمله]

السلام عليكم

مشاركه لاخى واستاذى محمد البرناوى @Barna بعد اذنه جزاه الله خيرا

محاوله منى على قد حالى و على ما فهمت من الاخ السائل يوسف عدلت على مثال اخى محمد

فالسطر التالى بدل To Me.s1 وضعت  العدد الاجمالى للطلاب DCount("id", "[tbl_all]")

ضع فى حق العدد سواء 22 او غيره وسيتم التنفيذ باذن الله

جزاه الله خيرا اخى محمد

 For x = 1 To DCount("id", "[tbl_all]")

Private Sub ÃãÑ0_Click()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Set db = CurrentDb
Set rs = db.OpenRecordset("tbl_all")
rs.MoveFirst
   On Error GoTo 1
    For x = 1 To DCount("id", "[tbl_all]")
        For i = 1 To Me.s1
        Debug.Print i, x
        rs.Edit
        rs!tarkeem = x
        rs.Update
        rs.MoveNext
skipeme:
        Next i
    Next x
    Me.Requery
    Me.Refresh
    Set rs = Nothing
    Set db = Nothing
DoCmd.OpenTable "tbl_all", acViewPreview
1:  End Sub

 

ترقيم مجموعه (1)(1).accdb

[يوسف_2023]

السلام عليكم 

هل يمكن تحويل هذا الكود ليكون داله توضع فى حقل محسوب سواء فى جدول او فى استعلام

فقط للعلم.... تحياتى وكل عام وانتم بخير

[يوسف_2023]

up