ترقيم تلقائي حسب الاصناف
السلام عليكم . يا اخوان انا عامل دالة DMax للترقيم التلقائي اكيد اغلبكم يعرفوها ... انا عندي صنفين من الخضار بطاطس وطماطم . اريد ان يكون الترقيم لكل على حده حسب الصنف
يعني الطماطم تبدا من 1 والبطاطس تبدا من 1 ايضا .... بمعنى انه في الملف المرفق لازم الترقيم يكون كالتالي ....
1- طماطم
1-بطاطس
2-بطاطس
3-بطاطس
2- طماطم
4- بطاطس
وهكذا ........
طبعا هذا مثال قياس على المطلوب الرئيسي اللي عندي يعني لا حد يقولي افصلهم كل واحد بجدول ... لازم يكونو مع بع
وعليكم السلام
تم تغيير اعدادات الحقل ID الى السماح بالتكرار ،
وتفضل الكود ، والذي يشتغل بعد ان تُدخل قيمة الحقل Type في النموذج:
Private Sub Type_AfterUpdate()
Me.ID = Nz(DMax("[ID]", "Table1", "[Type]='" & Me.Type & "'"), 0) + 1
End Sub
بس ملاحظة ، الموضوع غير متوقف على المادتين اللي ذكرتهم ، بل اذا اضفت اي مادة جديدة ، سوف يكون لها تسلسل مستقل.
جعفر
718.db1.accdb.zip
