Vergi oranları

[nadirornek]

01.01.2009'den geçerli VERGİ ORANLARI
………………..- YTL 8.700,00 TL 15%
8.701,00 YTL 22.000,00 TL 20%
22.001,00 YTL 50.000,00 TL 27%
50.001,00 YTL .................................-TL 35%

A1 hücresinde bulunan sayıdan vergi dilimleri alınsın.
Yani A1 hücresine hangi sayıyı yazarsak o sayıya karşılık gelen yüzdelik dilimlerden elde edilen toplamı B1 hücresine yazsın.Teşekkürler

 

[muhasebeciyiz]

http://www.excel.web.tr/f50/vergi-dilimi-hesaplama-t58867.html

buradaki örnekleri incelermisiniz ? Formül olarak kullanmak isterseniz ;

=EĞER(A1<=8700;A1*15%;EĞER(VE(A1>8701;A1<=22000);(A1-8700)*20%+1305;EĞER(VE(A1>22001;A1<=50000);((A1-22000)*27%+3965);((A1-50001)*35%+11525))))

 

[Zeki Gürsoy]

Güncel fonksiyon..

Function STOPAJ(Kumulatif_Toplam As Double, Aylik_Ucret As Double) As Double

Dim Fark      As Double
Const UST_I   As Long = 8700
Const UST_II  As Long = 22000
Const UST_III As Long = 50000

[COLOR=DarkGreen]'************* I. DILIM ****************[/COLOR]
If Kumulatif_Toplam <= UST_I Then
    STOPAJ = RoundA(Aylik_Ucret * 0.15, 2)

[COLOR=DarkGreen]'************* II. DILIM ***************[/COLOR]
ElseIf Kumulatif_Toplam > UST_I And Kumulatif_Toplam <= UST_II Then
        Fark = Kumulatif_Toplam - UST_I
        If Fark < Aylik_Ucret Then
            STOPAJ = (Aylik_Ucret - Fark) * 0.15
            STOPAJ = RoundA(STOPAJ + Fark * 0.2, 2)
        Else
            STOPAJ = RoundA(Aylik_Ucret * 0.2, 2)
        End If

[COLOR=DarkGreen]'************* III. DILIM ***************[/COLOR]
ElseIf Kumulatif_Toplam > UST_II And Kumulatif_Toplam <= UST_III Then
        Fark = Kumulatif_Toplam - UST_II
        If Fark < Aylik_Ucret Then
            STOPAJ = (Aylik_Ucret - Fark) * 0.2
            STOPAJ = RoundA(STOPAJ + Fark * 0.27, 2)
        Else
            STOPAJ = RoundA(Aylik_Ucret * 0.27)
        End If

[COLOR=DarkGreen]'************* IV. DILIM ****************[/COLOR]
ElseIf Kumulatif_Toplam > UST_III Then
        Fark = Kumulatif_Toplam - UST_III
        If Fark < Aylik_Ucret Then
            STOPAJ = (Aylik_Ucret - Fark) * 0.27
            STOPAJ = RoundA(STOPAJ + Fark * 0.35, 2)
        Else
            STOPAJ = RoundA(Aylik_Ucret * 0.35, 2)
        End If
End If
End Function

Private Function RoundA(Sayi, Optional Basamak As Long)
Kat& = 10 ^ Abs(Basamak)
If Basamak >= 0 Then RoundA = CDbl(FormatNumber(Left(Sayi, 30), Basamak))
If Basamak < 0 Then RoundA = CDbl(RoundA(FormatNumber(Left(Sayi, 30) / Kat), 0) * Kat)
End Function

 

[nadirornek]

Bu kodu nasıl çalıştırabilirim

 

[Zeki Gürsoy]

Bu kodu nasıl çalıştırabilirim

Bir hücreye örneğin,

Kümülatif vergi matrah toplamı: 9.000,00 ve
Aylık ücretinin vergi matrahı da: 1.000,00 olsun.

Fonksiyonunuz şu şekilde olmalıdır.

=STOPAJ(9000;1000)

Sonuç, "165,00" olacaktır.

 

[sert_unsuz]

Gelir vergisi formülü...

=EĞER(VE(AB2<43000;AB2+AH2>43000);(43000-AB2)*27/100+(AB2+AH2-43000)*35/100;EĞER(VE(AB2<19000;AB2+AH2>19000);(19000-AB2)*20/100+(AB2+AH2-19000)*27/100;EĞER(VE(AB2<7500;AB2+AH2>7500);(7500-AB2)*15/100+(AB2+AH2-7500)*20/100;EĞER(AB2=>43000;AH2*35/100;EĞER(VE(AB2=>19000;AB2+AH2<43000);AH2*27/100;EĞER(VE(AB2=>7500;AB2+AH2<19000);AH2*20/100;EĞER(VE(AB2+AH2<7500;AB2<7500);AH2*15/100)))))))

Bu örnekte AB2 hücresinde kümülatif, AH2 hücresinde ise gelir vergisi matrahı bulunmaktadır.
Sevgilerimle

 

[nerovan]

hocam, formül çok işime yaradı.yardımların ve emeğin için teşekkürlerimi sunuyorum.