تقريب مبلغ

السلام عليكم ورحمة الله

الاخ الكريم

لعمل هذا التقريب بفرض ان A هو مربع النص المحتوى على الرقم الاصلى, وان B هو مربع النص المطلوب تخزين التقريب فيه.

كل ماعليك عمله هو وضع هذا الكود داخل مربع النص B وستظهر النتائج التى طلبتها

=IIf(Int([A]/50)=[A]/50;[A];(Int([A]/50)+1)*50)

فى بداية الكود , نقوم بالسؤال عن العدد الاصلى , هل يقبل القسمة على 50 ام لا ؟ اذا كانت الاجابة نعم , فبالتاكيد لن نقوم بعمل تقريب له, واذا كانت لا عندها سيتم تنفيذ الجزء الثانى من الكود وهو الخاص بعمل التقريب , ويمكنك فهمه بسهوله ان شاء الله.

اخى الكريم اعددت لك برنامج كمثال ولكن للاسف يوجد عندى مشكلة بالمنتدى , فانا لا استطيع رفع ملفات منذ الانتقال الى السرفر الجديد ولكنى سأكتفى بعرض صورة بعض النتائج من خلال البرنامج

وبالتوفيق ان شاء الله,,,

مشكور اخي عماد

توصلت الى حل اخر وهي
=-(Int(-[A]/50)*50)