الرجاء تفعيل ازرار مشتريات يوم واسبوع وشهر وسنة

[ابو طارق سعيد]

يرجى تفعيل الازرار الموضحة بالصورة

بعد اختيار اسم المورد

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

ولكن اريد بمجرد الضغط على الزر ان تظهر القيم بدون اللجوء لوضع تاريخين

القاعدة مرفقة

Database1.accdb

[kkhalifa1960]

تفضل أخي ووافني بالرد .

تفعيل ازرار مشتريات يوم واسبوع وشهر وسنة.accdb

[ابو طارق سعيد]

اشكرك اخوى @kkhalifa1960 على المساعدة

ولكن لاحظ عندما اختار اسم المورد واضغط على زر مشتريات اخر يوم مثلا

يعطينى اسماء موردين اخرين

وكذلك عند الضغط على باقى الازرار

المطلوب ان اختار اسم المورد اولا

ومن ثم عند الضغط على اى زر ان يعطى فقط المشتريات من اسم المورد المختار من القائمة المنسدلة فقط  فى اخر يوم او اخر اسبوع او اخر شهر او اخر سنة

تم تعديل أبريل 10, 2023 بواسطه ابو طارق سعيد

[ابو طارق سعيد]

اين حبايبنا

@kkhalifa1960

@Eng.Qassim

@kanory

@Moosak

@محمد احمد لطفى

[محمد احمد لطفى]

تفضل هل هذا ما تريد

تم اضافة فقط الربط بين النماذج و اسم العميل
 

[Forms]![مشتريات لمدار السنة]![y1]

 

تفعيل ازرار مشتريات يوم واسبوع وشهر وسنة.accdb

[ابو طارق سعيد]

@محمد احمد لطفى

لا اخى

 ما اريده هو عند اختيار اسم المورد من القائمة المنسدلة

واضغط على زر مشتريات اخر يوم مثلا .. تظهر المشتريات من هذا المورد فى النموذج اسفله

وكذلك الحال لباقى الزراير اخر اسبوع واخر شهر واخر سنة

لا داعلى لفتح نموذج اخر 

وحتى النماذج الجديدة التى لا اريدها تعطى تواريخ خاطئة

عدل على هذه القاعدة المرفقة رجاء

Database1.accdb

تم تعديل أبريل 11, 2023 بواسطه ابو طارق سعيد

[ابو طارق سعيد]

@kkhalifa1960

@محمد احمد لطفى

حتى لو ضغطت على زر ليعطى تاريخ يوم مثلا .. يعطينى نتيجة خاطئة

[ابو طارق سعيد]

@kkhalifa1960 خليفة يا خليفة اين انت يا خليفة

[محمد احمد لطفى]

محاولة منى ولكن لا أعرف ما الخطأ ممكن أحد أساتذتى يعرف ما الخطأ

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

 

  

    Dim datex As Date:
    datex = #4/11/2023#:

    'مجموعة اوامر الحقل الاول
    'تاريخ الشراء
    myCriteria = "("
    myCriteria = myCriteria & "[استعلام لمدار السنة].[تاريخ الشراء]= '" & datex & "'"
    myCriteria = myCriteria & ")"

     Debug.Print myCriteria
    Me.[subForm1].Form.Filter = myCriteria
    Me.[subForm1].Form.FilterOn = True

 

حضرتك من خلال الكود ممكن البحث بين تاريخين  بدون اللجوء لوضع تاريخين من خلال النموذج

بالتوفيق 

 

[Moosak]

هذا الموضوع فيه إفادة إن شاء الله 🙂 

 

 

[kkhalifa1960]

تفضل ياأستاذنا . ووافني بالرد .

تفعيل ازرار مشتريات يوم واسبوع وشهر وسنة-1.accdb

[ابو طارق سعيد]

@محمد احمد لطفى اخى محمد البحث بين تاريخين موجود لدى مسبقا وقد عمله الاخ @kkhalifa1960 وهو يعمل بشكل ممتاز

ما اريده شىء  غير البحث بين تاريخين لشخص كسول لا يريد ان يضع التاريخين بل بكبسة زر تظهر له مشتريات اليوم السابق والاسبوع السابق والشهر السابق والسنة

[kkhalifa1960]

3 دقائق مضت, ابو طارق سعيد said:

ما اريده شىء  غير البحث بين تاريخين لشخص كسول لا يريد ان يضع التاريخين بل بكبسة زر تظهر له مشتريات اليوم السابق والاسبوع السابق والشهر السابق والسنة

هل راحعت البوست الأخير لي ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

[ابو طارق سعيد]

@kkhalifa1960 استاذى الفاضل

اعرف انى اثقلت عليك

فكرة حضرتك ممتازة ولكن نتائج القيم تخرج خاطئة

حتى اسهل عليك الامر

نحن اليوم بتاريخ 11/4/2023

المطلوب من زر مشتريات اليوم السابق هو مشتريات من يوم 11/4/2023 ليوم 10/4/2023

زر الاسبوع السابق من 11/4/2023 الى سبعة ايام ماضية بمعنى يوم 5/4/2023

زر الشهر السابق من يوم 11/4/2023 وحتى 30 يوم سابق اى 10/3/2023

زر السنة من 11/4/2023 لسنة سابقة اى 10/4/2022

[ابو طارق سعيد]

@kkhalifa1960 راجعت القاعدة الاخيره

لاحظ

والامر ينطبق على الاسبوع والسنة

 

[kkhalifa1960]

تقصد

1-مشتريات الشهر السابق أم أخر شهر ( قبل 30 يوم من الأن )

2- مشتريات الاسبوع السابق أم أخر أسبوع ( قبل 7 يوم من الأن )

3- مشتريات السنة السابقة أم أخر سنة ( قبل 365 يوم من الأن )

حدد من فضلك لأنه بيفرق كثيراً بالكود .

تم تعديل أبريل 11, 2023 بواسطه kkhalifa1960

[ابو طارق سعيد]

مشتريات (قبل 30 يوم من الان)

وقبل اسبوع من الان

وقبل سنة من الان

وقبل يوم من الان

عقال الراس يا خليفة غلبتك معى @kkhalifa1960

 

تم تعديل أبريل 11, 2023 بواسطه ابو طارق سعيد

[ابو طارق سعيد]

الان, kkhalifa1960 said:

1-مشتريات ( قبل 30 يوم من الأن )    بمعنى اليوم التاريخ 11/4/2023 يجب ان تكون القيم ما بين 11/4 - 10/3

2- مشتريات( قبل 7 يوم من الأن )

3- مشتريات ا ( قبل 365 يوم من الأن )

4- قبل يوم من الان 

 

تم تعديل أبريل 11, 2023 بواسطه ابو طارق سعيد

[kkhalifa1960]

تفضل وجرب ووافني بالرد .

تفعيل ازرار مشتريات يوم واسبوع وشهر وسنة-1 (2).accdb

[ابو طارق سعيد]

@kkhalifa1960 هناك زر واحد لافضل اجابة

المفروض يكون اكثر من زر 

زر افضل اجابة

وزر افضل اخ

وزر يعطيك العافية

وزر لك كل الاحترام

اعتبرهم كلهم لك

الامور تمام التمام

[kkhalifa1960]

ممكن اطلب منك شرح كيف أعمل

@kkhalifa1960

1 دقيقه مضت, ابو طارق سعيد said:

@kkhalifa1960 هناك زر واحد لافضل اجابة

المفروض يكون اكثر من زر 

زر افضل اجابة

وزر افضل اخ

وزر يعطيك العافية

وزر لك كل الاحترام

اعتبرهم كلهم لك

الامور تمام التمام

يا أخي كلنا هنا بنساعد بعض جزاك الله كل الخير ورمضان كريم .

ممكن اطلب منك شرح كيف أعمل

@kkhalifa1960

[ابو طارق سعيد]

العفو يا استاذى انا اتعلم منك

عموما

تضع اشارة @ وهى زر شفت+رقم2 من الكيبورد

وبعدها مباشره تكتب حروف الاسم الذى تريد اظهاره وكلما زدت حرفا اخر تزداد الفلترة حتى يظهر الاسم بالكامل 

مجرد اضغط عليه

@kkhalifa1960

 

[kkhalifa1960]

@ابو طارق سعيد

جزاك الله كل الخير ورمضان كريم .

تم تعديل أبريل 11, 2023 بواسطه kkhalifa1960

[ابو طارق سعيد]

@kkhalifa1960 ولك بالمثل ورمضان كريم عليك وعلى كل الاسرة الكريمة

[ابو طارق سعيد]

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

هو طبعا تم انشاءه بفضل الاخ @kkhalifa1960

فقط قمت باجراء تنسيق الالوان والخطوط له

 

 

تفعيل ازرار مشتريات يوم واسبوع وشهر وسنة-1 (2).rar

تم تعديل أبريل 11, 2023 بواسطه ابو طارق سعيد