maaş vergi dilimi hesaplama Gelir Vergisi Tarifesi 2020

[scorpion2121]

Gelir Vergisi Tarifesi 2020

22.000 TL'ye kadar 15%
49.000 TL'nin 22.000 TL'si için 3.300 TL, fazlası 20%
120.000 TL'nin 49.000 TL'si için 8.700 TL (ücret gelirlerinde 27%
180.000 TL'nin 49.000 TL'si için 8.700 TL), fazlası
600.000 TL'nin 120.000 TL'si için 27.870 TL (ücret gelirlerinde 600.000 TL'nin 180.000 TL'si için 44.070 TL), fazlası 35%
600.000 TL'den fazlasının 600.000 TL'si için 195.870 TL, (ücret gelirlerinde 600.000 TL'den fazlasının 600.000 TL'si için 191.070 TL), fazlası 40%

 

[Necdet]

Buraya Baktınız Mı?

 

[halit3]

Alternatif link

Gelir Vergisi Hesaplama

Makro kullanmadan Gelir Vergisi dilimlerine göre excel'de ödenecek vergi nasıl hesaplanır ? - 9.400 TL'ye kadar % 15 - 23.000 TL'nin 9.400 TL'si için 1.410 TL, fazlası % 20 - 53.000 TL'nin 23.000 TL'si için 4.130 TL, (ücret gelirlerinde 80.000 TL'nin 23.000 TL'si için 4.130 TL), fazlası %...

excel.web.tr

 

[scorpion2121]

Buraya Baktınız Mı?

Hocam kod ta mı altın üyelik

 

[mhaluksen]

2020 GELİR VERGİSİ HESAPLAMA

 

[mhaluksen]

bu da makrolu

 

[halit3]

bu da makrolu

Merhaba A1 Hücresine 9 basamaklı sayı girince hesaplamıyor.
100000001
bunu yazınca hesaplama yapmıyor.

 

[mhaluksen]

hocam bu makro daha öceden formdan alınmış ben değişiklik yaptım


Function G2020V(HÜCRE As Range)
Application.Volatile True
Select Case HÜCRE
Case 0 To 22000
G2020V = (HÜCRE * 15) / 100
Case 22000 To 49000
G2020V = 3300 + (((HÜCRE - 22000) * 20) / 100)
Case 49000 To 180000
G2020V = 8700 + (((HÜCRE - 49000) * 27) / 100)
Case 180000 To 600000
G2020V = 44070 + (((HÜCRE - 180000) * 35) / 100)
Case 600000 To 100000000000#
G2020V = 191070 + (((HÜCRE - 600000) * 40) / 100)
Case Is < 1000000
Case Else
G2020V = 0
End Select
End Function

makroda kırmızı işaretli sayıyı değiştirirseniz olur. tabi sizin yanınızda bize sözdüşmez ama kusura bakmayın bir katkıda ben bulunayım dedim.Hata bir saygısızlık yaptımsa özür dilerim.

 

[halit3]

hocam bu makro daha öceden formdan alınmış ben değişiklik yaptım


Function G2020V(HÜCRE As Range)
Application.Volatile True
Select Case HÜCRE
Case 0 To 22000
G2020V = (HÜCRE * 15) / 100
Case 22000 To 49000
G2020V = 3300 + (((HÜCRE - 22000) * 20) / 100)
Case 49000 To 180000
G2020V = 8700 + (((HÜCRE - 49000) * 27) / 100)
Case 180000 To 600000
G2020V = 44070 + (((HÜCRE - 180000) * 35) / 100)
Case 600000 To 100000000000#
G2020V = 191070 + (((HÜCRE - 600000) * 40) / 100)
Case Is < 1000000
Case Else
G2020V = 0
End Select
End Function

makroda kırmızı işaretli sayıyı değiştirirseniz olur. tabi sizin yanınızda bize sözdüşmez ama kusura bakmayın bir katkıda ben bulunayım dedim.Hata bir saygısızlık yaptımsa özür dilerim.

Merhaba
Hayır hata ve kusur yok.
Ne kadar alternatif olursa o kadar iyi olur.
Sağlıcakla Kalın

 

[scorpion2121]

Dostlar cevap karınız için saol un macro ile değilde formu ile yaparsanız sevinirim örnek verdiğim kod ta sıkıntı var mı

 

[scorpion2121]

EĞER(A1<=13000;A1*15%;EĞER(VE(A1>13000;A1 <=30000);1950+((A1-13000)*20%);EĞER(VE(A1>30000;A1<=70000);5350+( (A1-30000)*27%);EĞER(A1>70000;16150+(A1-70000)*35%;""))))

 

[mhaluksen]

benim 5 nolu mesajdaki formülle yapılmıştır.

 

[mhaluksen]

girilecek matrah A2 de hesaplama da a3 de
=EĞER(A2>600000;((A2-600000)*0,4+191070);EĞER(A2>180000;((A2-180000)*0,35+44070);EĞER(A2>49000;((A2-49000)*0,27+8700);EĞER(A2>22000;((A2-22000)*0,2+3300);EĞER(A2>22000;((A2-22000)*0,2+3300);EĞER(A2<22000;((A2)*0,15)))))))