nacer_alger قام بنشر يناير 2, 2020 مشاركة قام بنشر يناير 2, 2020 سلام عليكم ممكن مساعدة في كود اضعه في استعلام يعطيني ارباح لشهر الحالي جربت هدا الكود لكن يجلب لي المداخيل الشهر الحالي زائد نفس الشهر لسنة الماضية ان اريد الشهر الحالي من سنة الحالية وشكرا Expr1: Format([Date de Contrat];"mm") Format(Date();"mm") رابط هذا التعليق شارك More sharing options...
kha9009lid قام بنشر يناير 2, 2020 مشاركة قام بنشر يناير 2, 2020 لاظهار رقم الشهر =Month(Date()) او =Format(Date();"m") ولاسم الشهر الحالي =Format(Date();"mmm") 1 رابط هذا التعليق شارك More sharing options...
nacer_alger قام بنشر يناير 2, 2020 الكاتب مشاركة قام بنشر يناير 2, 2020 سوف اجربه اخي شكرا رابط هذا التعليق شارك More sharing options...
صالح حمادي قام بنشر يناير 2, 2020 مشاركة قام بنشر يناير 2, 2020 السلام عليكم قم بإضافة هذا الكود للاستعلام ليقوم باختبار الشهر و السنة معا. Expr2: Format([Date de Contrat],"yyyy") Format(Date(),"yyyy") 1 رابط هذا التعليق شارك More sharing options...
kha9009lid قام بنشر يناير 2, 2020 مشاركة قام بنشر يناير 2, 2020 عند استخدام معيار الشهر للحصول على اجمالي المبيعات او المشتريات لشهر محدد وكان لدينا سجلات تتوافق مع رقم الشهر لسنوات ماضية فانه سوف تواجهنا مشكلة جمع المبيعات لكافة الاشهر التي تتوافق مع المعيار المحدد مثلا مبيعات شهر 1/2018 و1/2019 و 1/2020 وهكذا لذالك يتطلب منا اضافة لرقم الشهر ان نستخدم معيار السنة بجانب الشهر وممكن عمل ذلك بعدة طرق ومن اسهل الطرق وايسرها ان نعمل حقلين في الاستعلام الاول لرقم الشهر من تاريخ الفاتورة والاخر للسنة وايضا من تاريخ الفاتورة Month([Date of invoice]) لرقم الشهر Year([Date of invoice]) للسنة وللحصول على مبلغ المبيعات نستخدم دالة DSum Format(Nz(DSum(" [Total]";"Invoices";"year([Date of invoice])=" & [y] & "And Month([Date of invoice])=" & [m]);0);"عملة") ومرفق مثال بسيط تم عملة على عجالة وللتسهيل على المتلقي تم عمل فصل الاشهر والسنوات في استعلام والنتيجة النهائية في استعلام ثاني Database74.accdb 3 رابط هذا التعليق شارك More sharing options...
أبوبسمله قام بنشر يناير 2, 2020 مشاركة قام بنشر يناير 2, 2020 4 ساعات مضت, kha9009lid said: عند استخدام معيار الشهر للحصول على اجمالي المبيعات او المشتريات لشهر محدد وكان لدينا سجلات تتوافق مع رقم الشهر لسنوات ماضية فانه سوف تواجهنا مشكلة جمع المبيعات لكافة الاشهر التي تتوافق مع المعيار المحدد مثلا مبيعات شهر 1/2018 و1/2019 و 1/2020 وهكذا لذالك يتطلب منا اضافة لرقم الشهر ان نستخدم معيار السنة بجانب الشهر وممكن عمل ذلك بعدة طرق ومن اسهل الطرق وايسرها ان نعمل حقلين في الاستعلام الاول لرقم الشهر من تاريخ الفاتورة والاخر للسنة وايضا من تاريخ الفاتورة Month([Date of invoice]) لرقم الشهر Year([Date of invoice]) للسنة وللحصول على مبلغ المبيعات نستخدم دالة DSum Format(Nz(DSum(" [Total]";"Invoices";"year([Date of invoice])=" & [y] & "And Month([Date of invoice])=" & [m]);0);"عملة") ومرفق مثال بسيط تم عملة على عجالة وللتسهيل على المتلقي تم عمل فصل الاشهر والسنوات في استعلام والنتيجة النهائية في استعلام ثاني Database74.accdb 512 kB · 8 تنزيلات اخى واستاذى خالد @kha9009lid جزاك الله خيرا ماهو التعديل المطلوب للحصول المبيعات لكل شهر لكل عميل سواء بناء على اسمه او كوده قمت بعده محاولات لكنها فشلت معى Expr1: Nz(DSum("[Out]";"RASEEDB";"ZCustomerID=' & ZCustomerID & ' and year([Zdate])=" & [ye] And Month([Zdate])=" & [mo]");0) عند تشغيل الاستعلام يظهر لى ادخل قيمه معلمه Zdate وكانه لا يعرف هذا الحقل تقبل تحياتى وجزاك الله عنا كل خير رابط هذا التعليق شارك More sharing options...
kha9009lid قام بنشر يناير 2, 2020 مشاركة قام بنشر يناير 2, 2020 اخي الفاضل @أحمد الفلاحجى ارفق لك نموذج مصغر لاحتساب الاجمالي للمشتريات الشهرية لكل مورد بنفس الطريقة التي وضعتها في الرد السابق امل الاطلاع لعل يكون فيه اجابة على استفساركم اخي العزيز Format(Nz(DSum(" [Total]";"Invoices_p";"month([Date of invoice])=" & [Expr1] & "And [customer]='" & [Customer] & "'");0);"عملة") لاحظ علامات التنصيص للحقل الرقمي وللحقل النصي format يمكن الاستغناء عنها ولكن انا استخدمتها للحصول على تنسيق عملة مباشرة Database74.accdb 1 رابط هذا التعليق شارك More sharing options...
أبوبسمله قام بنشر يناير 2, 2020 مشاركة قام بنشر يناير 2, 2020 7 دقائق مضت, kha9009lid said: اخي الفاضل @أحمد الفلاحجى ارفق لك نموذج مصغر لاحتساب الاجمالي للمشتريات الشهرية لكل مورد بنفس الطريقة التي وضعتها في الرد السابق امل الاطلاع لعل يكون فيه اجابة على استفساركم اخي العزيز Format(Nz(DSum(" [Total]";"Invoices_p";"month([Date of invoice])=" & [Expr1] & "And [customer]='" & [Customer] & "'");0);"عملة") لاحظ علامات التنصيص للحقل الرقمي وللحقل النصي format يمكن الاستغناء عنها ولكن انا استخدمتها للحصول على تنسيق عملة مباشرة Database74.accdb 464 kB · 1 تنزيلات ساجرب واوافيك بالرد اخى خالد جزاك الله كل خير تقبل تحياتى رابط هذا التعليق شارك More sharing options...
أبوبسمله قام بنشر يناير 2, 2020 مشاركة قام بنشر يناير 2, 2020 جزاك الله خيرا اخى خالد الخطأ كان منى فى الاول اذ اننى غفلت عن كونى جاعل رقم العميل حقل نصى فلقد نسيت لانى لم اعمل على هذا المرفق من زمن ولكن للحاجه عدت له من حوالى اسبوع وبالصدفه كنت اعمل على جلب اجمالى كل عميل كل شهر ولاقيت الاجابه امامى بفضل الله وعونه ثم بفضلكم اخى جزاك الله خيرا تقبل تحياتى وتمنياتى لك وللجميع بالتوفيق طبتم واهتديتم رابط هذا التعليق شارك More sharing options...
kha9009lid قام بنشر يناير 2, 2020 مشاركة قام بنشر يناير 2, 2020 1 دقيقه مضت, أحمد الفلاحجى said: جزاك الله خيرا اخى خالد الخطأ كان منى فى الاول اذ اننى غفلت عن كونى جاعل رقم العميل حقل نصى فلقد نسيت لانى لم اعمل على هذا المرفق من زمن ولكن للحاجه عدت له من حوالى اسبوع وبالصدفه كنت اعمل على جلب اجمالى كل عميل كل شهر ولاقيت الاجابه امامى بفضل الله وعونه ثم بفضلكم اخى جزاك الله خيرا تقبل تحياتى وتمنياتى لك وللجميع بالتوفيق طبتم واهتديتم الحمد لله اخي احمد وفالك التوفيق ابو بسملة 🌷 1 رابط هذا التعليق شارك More sharing options...
nacer_alger قام بنشر يناير 6, 2020 الكاتب مشاركة قام بنشر يناير 6, 2020 شكرا على الرد اخي احمد المثال جميل لكن اريد ان اظهار مبيعات للشهر الحالي فقط هل يمكنك اضافة في معيار استعلام ادا امكن 1 رابط هذا التعليق شارك More sharing options...
kha9009lid قام بنشر يناير 6, 2020 مشاركة قام بنشر يناير 6, 2020 اذا كان المطلوب فقط للشهر الحالي ولا نحتاج للاشهر السابقة ممكن عملها بطريقة اسهل DSum(" [Total]";"Invoices";"year([Date of invoice])=" & Year(Date()) & "And Month([Date of invoice])=" & Month(Date())) انظر للمرفق Database78.accdb 2 رابط هذا التعليق شارك More sharing options...
nacer_alger قام بنشر يناير 6, 2020 الكاتب مشاركة قام بنشر يناير 6, 2020 جزاك الله خيرا هدا هو المطلوب لقد افدتني اخي شكرا 1 رابط هذا التعليق شارك More sharing options...
kha9009lid قام بنشر يناير 6, 2020 مشاركة قام بنشر يناير 6, 2020 منذ ساعه, nacer_alger said: جزاك الله خيرا هدا هو المطلوب لقد افدتني اخي شكرا الشكر لله سبحانه 1 رابط هذا التعليق شارك More sharing options...
أبوبسمله قام بنشر يناير 6, 2020 مشاركة قام بنشر يناير 6, 2020 جزاك الله خيرا أخى خالد الشكر لله اخى نصرالدين ثم لاخواننا واساتذتنا جزاهم الله عنا كل خير تقبلوا تحياتى وتمنياتى لكم وللجميع بالتوفيق 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.