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

ترتيب التاريخ تصاعدى من النموذج الرئيسى


إذهب إلى أفضل إجابة Solved by عبد الفتاح كيرة,

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

  • أفضل إجابة

عليكم السلام و رحمة الله و بركاته

أولا ما يصلح أن تسمى حقلا باسم date

غيرته إلى mdate

أضف السطرين التاليين إلى زر ترتيب تصاعدى فى النموذج الرئيسى

Me.test.Form.OrderBy = "mdate asc"
Me.test.Form.OrderByOn = True

ملفك بعد التعديل

test1005.rar

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

4 ساعات مضت, محمد احمد لطفى said:

كيف يتم عرض الترتيب مع عدم عرض الخلايا الفارغة

ملفك ليس به سجلات فارغة

ما يظهر فى نهاية النموذج الفرعى هو لاستقبال سجل جديد

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

أعلم ولكن اذا كان خانة التاريخ هناك خلايا فارغة 
كما بالمثال كيف سيكون الكود 

 

Me.test.Form.OrderBy = "mdate asc"
Me.test.Form.OrderByOn = True

test1005.rar

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

عندما تريد عمل ترتيب في نموذج ، فالأفضل عمل الترتيب في الاستعلام مصدر بيانات النموذج ، حيث يمكنك عمل تسلسل لأكثر من حقل ، وهذا مفيد اذا كان عندك احد الحقول قيمته متساوية (او فارغة) ، فيقوم الترتيب على اساس الحقل التالي بعد الحقل الاول ،

 

اما التقرير ، فلا يحترم ترتيب الاستعلام ، وانما يجب عمله من المجاميع

452.Clipboard07.jpg

 

جعفر

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

عند الضغط تصفية التاريخ سيظهر بعد الخلايا لا يوجد بها تاريخ  

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

Capture1.JPG

660.Test2000.rar

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

1 hour ago, jjafferr said:

استخدم نفس الطريقة التي استعملناها هنا:

 

جعفر

ولكن ستظهر الخلايا الفارغة وغير الفارغة الا يوجد كود لعرض لحجب الخلايا الفارغة 
مثل كود  الترتب التصاعدى

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

سؤالك كان ، وعليه وضعت لك الرد:

2 ساعات مضت, محمد احمد لطفى said:

لا اريد منع الخلايا الفارغة من الاستعلام 
لانه سيحذف سجلات 

 

اما الآن فانت تقول غير هذا:

3 دقائق مضت, محمد احمد لطفى said:

ولكن ستظهر الخلايا الفارغة وغير الفارغة الا يوجد كود لعرض لحجب الخلايا الفارغة

 

جعفر

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

14 hours ago, محمد احمد لطفى said:

كيف يتم عرض الترتيب مع عدم عرض الخلايا الفارغة

أسف لذلك فتحت موضوع جديد 

هذا  نموذج تصفية بيانات 

فى بعض الاحيان سأحتاج ظهور الخلايا التى بها تاريخ فقط 

مع عدم عرض السجلات التى لا يوجد بها بيانات فى التاريخ 
وجزاكم الله خيرا 

660.Test2000.rar

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

4 hours ago, محمد احمد لطفى said:

عند الضغط تصفية التاريخ سيظهر بعد الخلايا لا يوجد بها تاريخ  

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

Capture1.JPG

660.Test2000.rar

يعنى هنا مثلا زرار تصفية التاريخ عاوز ابحث عن المدينة الدقهلية ومعرفة الاشخاص  من هم لهم تاريخ فقط 
فى زرار تانى المدينة اسكندرية عاوز اعرف الى عندهم ولاد 
زرار تالت اسكندرية عاوز اعرف الى معندهمش ولاد 
اعملها اذاى فى الاستعلام 
 

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

الله عليك 
كيف نعمل اكبر من التاريخ ليعطينا تاريخ اليوم و التواريخ التالية

Just now, محمد احمد لطفى said:

الله عليك 
كيف نعمل اكبر من التاريخ ليعطينا تاريخ اليوم و التواريخ التالية

أسف 
 

Me.test.Form.Filter = "[mdate]>=#1-2-2017#"
Me.test.Form.FilterOn = True

لى عودة

 

انا عارف انى زهقت حضرتك 

الكود اشتغل رائع

ولكن عند الضغط على زرارا 
Up

لارجاع جميع البيانات 
أو تنفيذ امر أخر 
لا ينفذ الامر 

660.Test2000.rar

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

9 ساعات مضت, محمد احمد لطفى said:

الكود اشتغل رائع

ولكن عند الضغط على زرارا 
Up

لارجاع جميع البيانات 
أو تنفيذ امر أخر 
لا ينفذ الامر 

 

الحمدلله:smile:

 

طريقة عمل فلتر/تصفية/Filter النموذج هو ، انه يضيف الى التصفية كلما طلبت منه تصفيه ، او استخدمت الامر السابق ،

لذلك ، واذا اردت تصفية واحدة فقط بإستخدام الزر ، فعليك حذف التصفية السابقة ، ثم عمل تصفية جديدة ، 

 

9 ساعات مضت, محمد احمد لطفى said:

التاريخ ليعطينا تاريخ اليوم و التواريخ التالية

 

Me.test.Form.Filter = ""
Me.test.Form.Filter = "[mdate]>=#" & Date & "#"
Me.test.Form.FilterOn = true

 

جعفر

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

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

لان تنفيذ هذا الامر يجعل النموذج لا يعمل بشكل صحيح بعده 
اذا كنت نفذت الامر واريد ان اعرض بعد ذلك بيانات الاسكندرية مثلا لن ينفذ الامر 

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

 

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

جزاك الله خيراً
شكرا لك استاذى جعفر 

تم عكس الامر باضافة فى زرار 
Up 
 

Me.test.Form.Filter = "[mdate]>=#" & Date & "#"
Me.test.Form.FilterOn = false


لى عودة فى موضوع أخر 
تم تعديل بواسطه محمد احمد لطفى
  • Like 1
رابط هذا التعليق
شارك

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