الرئيسية
ماكرو اكسل لحساب الضريبة على الاجر وفق التعديل الجديد 2020
(نذهب ل افيشاج. ثم ماكرو)
للعمال العاديين Norm
نسميها irgn
Function irgn(i)
i = Format(i, "000.00")
p = Right(i, 4)
If i > 30000 Then
If i > 30000 And i < 35000 Then
irgn = ((((i - p - 30000) / 10 * 3) + 2500) * 8 / 3) - (20000 / 3 )
End If
If i >= 35000 Then
irgn = ((i - p - 30000) / 10 * 3) + 2500
End If
End If
End Function
**********
للعمال ذوي الاحتياجات الخاصة Handi
نسميها irgh
Function irgh(i)
i = Format(i, "000.00")
p = Right(i, 4)
If i > 30000 Then
If i > 30000 And i < 40000 Then
irgh = ((((i - p - 30000) / 10 * 3) + 2500) * 5 / 3) - (12500 / 3 )
End If
If i >= 40000 Then
irgh = ((i - p - 30000) / 10 * 3) + 2500
End If
End If
End Function
ملاحظة: هناك طريقة اخرى باختصار المعادلة حيث نستعمل مباشرة 8/10 للعاديين و 1/2 لذوي الاحتياجات الخاصة.
كما ان هناك طريقة اخرى، لكن باستعمال دالة شرطية si .
بالتوفيق.
