• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

maaş vergi dilimi hesaplama Gelir Vergisi Tarifesi 2020

Katılım
18 Şubat 2017
Mesajlar
27
Excel Vers. ve Dili
exel
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%
 
Alternatif link

 
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.
 
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
 
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ı
 
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%;""))))
 
benim 5 nolu mesajdaki formülle yapılmıştır.
 
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)))))))
 
Geri
Üst