كيف احسب عدد الصفوف التي لا تحتوي على صفربالتقارير

[albashmohaseb]

السادة اعضاء المنتدى المحترمين

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

فانا استخدم دالة COUNT وتعطينى الناتج 11 كما بالصورة فى حين يوجد 3 صفوف بها صفر واريد الناتج يكون 9

اشكر لكم تعاونكم واتمنى لكم التوفيق 

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

[أبو نادر]

11 جمع صحيح للكميات

ال 9 الي تقولها تبع ايش ؟ وضح

[أبو نادر]

فهمتك .. تبي عدد الصفوف والشرط ان الكمية لا تساوي الصفر

في تقريرك المرفق الصفوف  8  مو  9

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

=DCount("ID";"TABLE_NAME";"QUANTITY <> 0")

 

[albashmohaseb]

استاذ ابو نادر هو فعلا اللى ابيه عدد الصفوف التي لا تحتوي على صفر وعفلا عددها 8 مو 9 لكن الكود لا يعمل

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

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

فانا لا ادري ماهو ال ID وما هو اسم الجدول المراد ادراجه بالكود

اسف على الاطالة واتمنى المساعدة وشكرا

[AlwaZeeR]

=Count(IIf([QUANTITY]<>0,0))

 

[albashmohaseb]

اشكرك اخي شكرا جزيلا المعادلة اشتغلت تمام بس لزيادة الفائدة انا استخدم MS Office 2013

والمعادلة عشان تظبط تكون بالشكل ده

=Count(IIf([QUANTITY]<>0;0))

ولكن لي سؤال اخر لو تكرمت وتقدر تساعدني اكون شاكر افضالك

عندي فورم اذن صرف وبه 2 command button

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

فمن يتكرم بتوضيح المشكلة وكيفية علاجها اكون ممتن وجزاه الله خير

الصور التاليه لتوضيح المشكلة اكثر

[AlwaZeeR]

ما نوع الحقل؟

Issuance ID

هل هو رقم ام نص؟؟؟

[albashmohaseb]

الحقل نص 

[AlwaZeeR]

ضع هذا الكود تحت امر معاينة

مع تغيير ما يلزم

Dim InviceFiltR As String
InviceFiltR = "[Issuance ID] ='" & Me.[Issuance ID] & "'"

DoCmd.OpenReport "YrRep", acPreview, , InviceFiltR

ولا حاجة للفلتر في الاستعلام

 

[albashmohaseb]

انا في غاية الامتنان والشكر لك استاذي الكريم 

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

بارك الله في صحتك ورزقك الفردوس الاعلى