ترتيب التوقيت في التقرير طبقاً للنموذج

[محمود أبوسيف]

السلام عليكم

عندي نموذج أقوم فيه بإختيار التوقيت من و إلي

المطلوب أن يظهر في التقرير نفس ترتيب التوقيت الذي قمت بإختياره في النموذج

( يعني لو اخترت مثلا التوقيت من 7 إلي 8  ثم من 8 إلي 9  وهكذا أريد أن أجدهم في التقرير بنفس هذا الترتيب )

ترتيب التوقيت.rar

[Shivan Rekany]

14 ساعات مضت, محمود أبوسيف said:

السلام عليكم

عندي نموذج أقوم فيه بإختيار التوقيت من و إلي

المطلوب أن يظهر في التقرير نفس ترتيب التوقيت الذي قمت بإختياره في النموذج

( يعني لو اخترت مثلا التوقيت من 7 إلي 8  ثم من 8 إلي 9  وهكذا أريد أن أجدهم في التقرير بنفس هذا الترتيب )

ترتيب التوقيت.rar

تم تغییر فی اسم التقریر و النموذج
يمكنك تستخدم هذا الكود عند فتح التقرير

Private Sub print_Click()
On Error Resume Next
DoCmd.OpenReport "repo", acViewPreview, , Me.Filter
Report_repo.OrderBy = Forms!showtbl.OrderBy
Report_repo.OrderByOn = True
End Sub

اليك المرفق

 

ترتيب التوقيت (1).rar

[محمود أبوسيف]

9 ساعات مضت, Shivan Rekany said:

تم تغییر فی اسم التقریر و النموذج
يمكنك تستخدم هذا الكود عند فتح التقرير

Private Sub print_Click()
On Error Resume Next
DoCmd.OpenReport "repo", acViewPreview, , Me.Filter
Report_repo.OrderBy = Forms!showtbl.OrderBy
Report_repo.OrderByOn = True
End Sub

اليك المرفق

 

ترتيب التوقيت (1).rar

أخي شفان أشكرك جزيلاً علي متابعتك

ولكني عندما حاولت أن أجرب الكود علي زر أخر لطباعة الكل ظهر لي الآتي

1- التوقيتات بدون ترتيب كما كانت في البداية 

2- الأيام بدون ترتيب أيضاً فالمفروض تكون كالتالي ( السبت - الاحد - الاثنين - الثلاثاء - الاربعاء - الخميس - الجمعه )

أرجو اتساع صدرك

ترتيب 2.rar

[Shivan Rekany]

القي نظرتا الى هذا

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

ترتيب 2.rar

[محمود أبوسيف]

9 ساعات مضت, Shivan Rekany said:

القي نظرتا الى هذا

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

ترتيب 2.rar

مستر شفان انظر الي الملف بعد اضافة باقي الأيام 

(تجد أن الايام تخلبطت والتوقيت كذلك )

ترتيب 2.rar

[Shivan Rekany]

2 ساعات مضت, محمود أبوسيف said:

مستر شفان انظر الي الملف بعد اضافة باقي الأيام 

(تجد أن الايام تخلبطت والتوقيت كذلك )

ترتيب 2.rar

اتفضل

ترتيب 2 (1).rar

[محمود أبوسيف]

14 ساعات مضت, Shivan Rekany said:

اتفضل

ترتيب 2 (1).rar

تمام بارك الله فيك وزادك علماً

--- هل لي بطلب آخر ---

أريد بعد إضافة سجل جديد في النموذج يأخذ هذا السجل ترتيبه تحت اليوم الذي يتبعه ---

وذلك يكون بمجرد الانتهاء من ادخال البيانات والانتقال لسجل آخر

[Shivan Rekany]

1 ساعه مضت, محمود أبوسيف said:

تمام بارك الله فيك وزادك علماً

--- هل لي بطلب آخر ---

أريد بعد إضافة سجل جديد في النموذج يأخذ هذا السجل ترتيبه تحت اليوم الذي يتبعه ---

وذلك يكون بمجرد الانتهاء من ادخال البيانات والانتقال لسجل آخر

طلبك ليس موضحة لي ... اشرح بالتفصيل مع المثال 

[محمود أبوسيف]

9 ساعات مضت, Shivan Rekany said:

طلبك ليس موضحة لي ... اشرح بالتفصيل مع المثال 

مثلاً لو قمت باضافة توقيت من 3 الي 4 في يوم السبت ستكون الاضافة في اخر سجل بالنموذج

المطلوب بعد الانتهاء من ادخال بيانات السجل الجديد يتم نقل هذا السجل مع سجلات يوم السبت

[Shivan Rekany]

45 دقائق مضت, محمود أبوسيف said:

مثلاً لو قمت باضافة توقيت من 3 الي 4 في يوم السبت ستكون الاضافة في اخر سجل بالنموذج

المطلوب بعد الانتهاء من ادخال بيانات السجل الجديد يتم نقل هذا السجل مع سجلات يوم السبت

استخدم هذا الكود بعد تحديث الفورم
 

Private Sub Form_AfterUpdate()
    Me.OrderBy = "[Days]" & DESC
    Me.OrderByOn = True
End Sub