مساعده فى الغاء رساله #error عند طباعة محتوى فارغ بالتقرير

[Hamada Tornado]

كل سنه وانتم طيبين

اريد مساعده فى الغاء رساله #Error عند القيام بالطباعه واذا كان هناك لا يوجد بيانات بالتقرير فتظهر رساله #Error

[Hamada Tornado]

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

نقوم بأنشاء وحده نمطية 

Public Function NullToZero( TheValue as Variant)

'This function converts Null to Zero

'It also converts Non Existing Data to Zero

On Error Goto NullToZero_Err

 

If ISNull(TheValue) then

NullToZero = 0

Else

NullToZero = TheValue

End if

Exit Function

 

NullToZero_Err:

'This function would only generate an error

'if the data in TheValue doesn't exist at all.

NullToZero = 0

Exit Function

End Function

ونقوم بعد ذلك بأضافه NullToZero مصدر البيانات قبل الداله المراد استخدامها للـ Text Box 

مثلا 

=Sum(NullToZero([InvoiceAmt])

و هذا الكود يقوم بألغاء رساله الخطأ لداله Sum و Avg 

تم تعديل يوليو 18, 2015 بواسطه Hamada Tornado

[jjafferr]

وعليكم السلام :-)

يمكنك استخدام الكود التالي ، و بدون الوحدة النمطية:

=Sum(Nz([invoiceAmt],0)

NZ معناه:

Null to Zero

جعفر

[Hamada Tornado]

وعليكم السلام :-)

يمكنك استخدام الكود التالي ، و بدون الوحدة النمطية:

=Sum(Nz([invoiceAmt],0)

NZ معناه:

Null to Zero

جعفر

هيا فعلا الطريقة دى افضل بس كان عندى سؤال 

هو ليه لما اعمل مثلا ميزانية عمومية و فى الداله اللى حضرتك حاطتها او غيرها لما احطها فى زيل التقرير لا تعمل وذلك عندما يكون العملية الحسابية تساوى مثلا صفر +5 فالمفروض الناتج يساوى 5 بيجيبلى #type!

مع العلم عند وضع الداله فى ال detail تعمل بطريقة صحيحة

وشكرا لك اخى الغالى على الاهتمام

[jjafferr]

سؤالك غير واضح :-(

رجاء التوضيح بشكل تفصيلي.

جعفر

[Hamada Tornado]

سؤالك غير واضح :-(

رجاء التوضيح بشكل تفصيلي.

جعفر

 

شكرا اخى الغالى 

ارفقت لك التقرير وهو يحتوى على تقريران يومية 

يوم 18/6/2015 

ويوم 20/6/2015

عند طباعه يوم 20/6/2015 يطبع التقرير بدون اى اخطاء 

وعند طباعه تقرير يوم 18/6/2015 يظهر خطاْ وذلك لان رصيد اول المده بيساوى صفر 

 

report Error Type.rar

تم تعديل يوليو 19, 2015 بواسطه Hamada Tornado

[jjafferr]

المشكلة لم تكن في Nz وإنما كانت بسبب اقسام الاكسس ، التفصيل وذيل التقرير.

استخدم التالي:

Rseed awl

=Nz(([Esal (RsedAwl)].[Report]![EsalawlSum])-([Ezn (RsedAwl)].[Report]![EznawlSum]),0)

Esal TOT

=Nz([Rseed awl]+[Esal (yawmya)].[Report]![EsalyawmyaSum],0)

رصيد نهاية اليوم

=[Esal_TOT]-[EznTOT]

Can Shrink = NO =قابل للتقلص

جعفر