الرئيسيةبحـثالمجموعاتالتسجيلدخول


شاطر | 
 

 حساب الضريبة في ملف إكسل

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل 
كاتب الموضوعرسالة
scream
المِؤسس



scream.1fr1.net
الطاقة : 1823

نقاط : 22127161


مُساهمةموضوع: حساب الضريبة في ملف إكسل   الجمعة 7 أكتوبر 2011 - 17:39

حساب الضريبة في ملف إكسل،
احاول شرح كيفية استعمالها.
1- تفضل بفتح برنامج اكسل ، قم أولا بالدخول الى الخيارات ، قم باختيار أمان الماكرو ، اختر بعدها مستوى *ضعيف*
2- قم بالضغط على الزر الايمن للفأرة تظهر لك قائمة اختر التعليمات البرمجية بالعربية أو visualiser le code باللغة الفرنسية بعدها تفتح لك صفحة التعليمات البرمجية
3- قم بالنقر على insertion اختر module تفتح لك صفحة لادراج التعليمات البرمجية.
4- انسخ هذه التعليمات البرمجية والصقها بها.

Function irg(i)
i = Format(i, "000.00")
p = Right(i, 4)
If i > 15000 Then
If i > 15000 And i < 22510 Then
irg = (i - p - 15000) / 5
End If
If i >= 22510 And i < 28760 Then
irg = ((i - p - 22500) * 0.12) + 1500
End If
If i >= 28760 And i < 30010 Then
irg = ((i - p - 28750) / 5) + 2250
End If
If i >= 30010 Then
irg = ((i - p - 30000) / 10 * 3) + 2500
End If
End If
End Function

5- انقر على débogage ثم انقر compiler vbaproject
6- اغلق هذه الصفحة ، ثم عد ورقة العمل بنفس الملف ، ثم افرض خانة الخاضع للضريبة مثلا a1 واختر خانة أخرى من اجل ناتج العملية مثلا b1 ضع فيها هذه الدالة: =irg(a1)
في الاخير أؤكد لو اتبعت الخطوات ، ستكون النتيجة مضبوطة.
الرجاء لمن جربها أن يرد ويقيم هذه المحاولة. وشكرا للجميع .
اليكم صفحة اكسس 2003 لحساب الضريبة






المصدر: منتدى الصرخة


 

Moonأَحِـنُّ إِلَى الكَـأْسِ التِي شَـرِبَتْ بِهَـا** Love11 **وأَهْـوَى لِمَثْـوَاهَا التُّـرَابَ وَمَا ضَـمَّاMoon 

الرجوع الى أعلى الصفحة اذهب الى الأسفل
http://scream.1fr1.net
 
حساب الضريبة في ملف إكسل
استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
 :: المنتدى التعليمي :: منتدى العلوم الإقتصادية و علوم التسيير-
انتقل الى: