حذف سجل حذف سجل من جدول بواسطة كود vba اذا كانت قيمته صفر

[عبد اللطيف سلوم]

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

ويتم بهذه الحالة وضع سجل مبيعات بقيمة صفر

 

عملت استعلام حذف واشغله من النموذج الرئيسي تحت زر عند النقر

لكن لا اجدها طريقة مجدية

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

تم تعديل يونيو 13, 2018 بواسطه عبد اللطيف سلوم

[alaa aboul-ela]

السلام عليكم

الافضل هو عمل معيار على الاستعلام والخاص بيومية المبيعات او حسابات العملاء او عمولات المناديب في حقل الكمية او السعر باستبعاد كل القيم التي تساوي صفر او null اي بدون قيمة

 

IS NOT NUL

 

طريقة اخرى تجدها على الرابط التالي بشرح وافي 

مع استبدل اسم الحقل من Id الى كمية المبيعات او قيمة المبيعات او سعر البيع او اي حقل تريد 

 

واليكم الملف الخاص بالمشاركة بدون ادنى تعديل من باب الامانة العلمية 

 

 

Delete Records.rar

تم تعديل يونيو 13, 2018 بواسطه alaa aboul-ela

[kanory]

  في 13‏/6‏/2018 at 16:14, عبد اللطيف سلوم said:

 

عملت استعلام حذف واشغله من النموذج الرئيسي تحت زر عند النقر

لكن لا اجدها طريقة مجدية

اريد كود vba 

Expand  

اخي @عبد اللطيف سلوم حول الاستعلام الى امر vba

[alaa aboul-ela]

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

1- ان هذه السجلات اخذت رقم تسلسل اوتوماتيكيا او ألى على النظام

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

3- في حالة الحذف يتم مساوة السجلات المدخلة بالخطأ او عن غير قصد مع السجلات التي حذفت بالقصد ولذلك ربما يقوم مدخل البيانات بحذف سجلات او بنود من الفاتورة بحجة ان الكهرباء قطعت او حدث خلل بالنظام مما يكلف الشركة خسائر كبيرة وفادحة ...

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

او اختيار الحقل الذي يحمل قيمة صفر في خانة الكمية وليس القيمة

[عبد اللطيف سلوم]

  في 13‏/6‏/2018 at 17:58, kanory said:

اخي @عبد اللطيف سلوم حول الاستعلام الى امر vba

Expand  

كيف يعني ؟ تحويله الى sql ??

[kanory]

اخي @عبد اللطيف سلوم اقصد من sql الى vba

[alaa aboul-ela]

بامكانك رفع الملف لاجري لك عليه التعديل المطلوب ...

[عبد اللطيف سلوم]

  في 13‏/6‏/2018 at 19:15, kanory said:

اخي @عبد اللطيف سلوم اقصد من sql الى vba

Expand  

مش زابطة معي اغلبك الطريقة شرح ؟؟

 

حولت الاستعلام الى sql

طلع معي هيك

DELETE مبيعات.[كود الفاتورة], مبيعات.[نوع الفاتورة], مبيعات.[كود العميل 3], مبيعات.[كود الصنف 3], مبيعات.النوع, مبيعات.السعر, مبيعات.المربح, مبيعات.[خصم مسموح به], مبيعات.[اجمالي الفاتورة], مبيعات.الكمية, مبيعات.ملاحظات, مبيعات.[تاريخ البيع], مبيعات.[ضريبة مبيعات], مبيعات.[رقم الفاتورة الورقية]
FROM مبيعات
WHERE (((مبيعات.الكمية)=0));
 

وين اضع هذا الكود ؟؟ وكيف احوله الى مايكرو ؟؟

اذا وصلت المايكرو استطيع تحويل المايكرو الى vba

[kanory]

اخي @عبد اللطيف سلوم انظر الرابط 

  في 12‏/8‏/2017 at 19:12, Barna said:

تفضل أخي وجدت لك هذا

SQl To VBA.rarFetching info...

Expand  

 

[عبد اللطيف سلوم]

  في 13‏/6‏/2018 at 19:56, kanory said:

اخي @عبد اللطيف سلوم انظر الرابط 

 

Expand  

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

 

تمت العملية بنجاح     

[kanory]

اخي @عبد اللطيف سلوم الحمد لله رب العالمين