2015 yılı GV oranlarına Göre Gelir Vergisi Hesaplama

[göçeri1]

Ekdeki dosyada 2015 Yılı Gelir Vergisi Dilimlerine Göre , Gelir Vergisi hesaplamada hata var formülü inceleyip yardımcı olursanız sevinirim.
Herkese iyi çalışmalar

 

[Ömer BARAN]

Mesaja eklediğiniz belgeye bakmadım.
Kendi kullandığım ekli dosya işinizi görecektir.

 

[Ömer BARAN]

Olması gereken: 35.137,86 TL matrah üzerinden 6.857,22 TL oluyor.

 

[Zeki Gürsoy]

Yıllık GV için aşağıdaki fonksiyonu kullanın. Ücretlerde ise, fonksiyon içindeki 3.dilimi değiştirip matrahlar arasındaki farktan o ay için ücretten kesilecek GV ne ulaşırsınız. Yani;

=Standart_GV(Aralık 2014 küm. matrah) - Standart_GV(Kasım 2014 küm. matr.)

Ücretelerde GV hesaplamanın aynı sonucu veren 3 farklı yolu vardır.

Function Standart_GV(ByVal matrah As Double) As Double
Dim dilim as Variant
Dim oran as Variant

        dilim = Array(0, 12000, 29000, 66000)
        oran = Array(0, 0.15, 0.2, 0.27, 0.35)
       
        Select Case matrah
            Case Is <= dilim(1)
                Standart_GV = RoundA(matrah * oran(1), 2)
            Case dilim(1) To dilim(2)
                Standart_GV = RoundA(((matrah - dilim(1)) * oran(2)) + Standart_GV(dilim(1)), 2)
            Case dilim(2) To dilim(3)
                Standart_GV = RoundA(((matrah - dilim(2)) * oran(3)) + Standart_GV(dilim(2)), 2)
            Case Else
                Standart_GV = RoundA(((matrah - dilim(3)) * oran(4)) + Standart_GV(dilim(3)), 2)
        End Select
    End Function

    Private Function RoundA(Sayi, Optional Basamak As Long)
    Dim Kat 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

 

[göçeri1]

Ücretli Çalışanlar için Gelir Vergisi Hesaplama

Ömer Bey Öncelikle İlginize teşekkür ederim.

Ücretli Çalışan için Ekteki Örnekte;
23.261,88 TL -- Gelir Vergisi Matrahını,
35.137,85 TL -- Kümülatif Gelir Vergisi Matrahı dilimlerini dikkate alarak
5.075,65 TL -- Gelir Vergisi olması Gerekiyor.

Ancak Bunu Formülle nasıl yapabilirim.

 

[Ömer BARAN]

Merhabalar, 5.075,65 TL'yi nasıl hesaplıyorsunuz acaba?
Benim yazdığım 6.857,22 TL'lik GV miktarı, 35.137,85 TL'lik matraha göre hesaplanmış tutardır.

 

[cayaso]

Süregelen Matrah 35137,85, Vergi Matrahı da 23261,88 ise Hesaplanan G.V.=6280,71 olur.
29000-66000 aralığının vergi oranı %27'dir. Eğer yanlış anlamamışsak.

 

[göçeri1]

Merhaba Ömer Bey GV sini heaplama şekli
Ekte Dosyada var

23.261,88 -- İhbar Tazminatı Gelir Vergisi Matrahı
11.875,98 -- Devreden Kümülatif Gelir Vergisi Matrahı
35.137,85 -- Son Kümülatif Gelir Vergisi Matrahı

Son KGVM =35.137,85 tl dikkate alınarak 23.261,88 GVM Verği dilimlerine Göre Dağılım

GVM dağılımı Açıklama
1- 126,02 %15 dilim (23.261,88-6.136,85-16.999)
2- 16.999,00 %20 dilim (29000-12001)
3- 6.136,85 %27 dilim (35.137,85-29.001)

Yukarıdaki dağılıma göre: 5.075,65 TL Gelir vergisi oluşuyor
İlginize Teşekkür Ederim.

 

[Ömer BARAN]

Vergicilikte +1 TL'nin nereye yazılacağının önemini de hatırlatmam lazım.
Ekteki dosyayı inceleyiniz. Sarı zeminli alana Gelir Vergisi Matrahı'na ilave edilecek tutarı yazmanız yeterli.
İyi günler dilerim.

 

[halit3]

Gelir vergisi hesaplamaları ile ilgili bu sitede bir çok kod , fonksiyon ve tartışmalar mevcut bende kendi yaptığım kodu dosyası ile birlikte ekliyorum.

Herhalde yazı dilinde birbirimizi anlıyamıyoruz.

Örnek dosyada görüleceği üzerine (kümülatif_matrah) ve (matrah) değerleri alınarak (gelirvergisi) bulunmuştur.

Kümülatif matrahınızı bir hücreye yazın (yani daha önceden gelir vergisi hesaplanmış matrahlar)
Matrahı bir hücreye yazın (yani daha önceden gelir vergisi hesaplanmayan matrahlar)

sonra hücrenin birine aşağıdaki ktf yazın.

=Gelir(kümülatif_matrah;matrah)

kod:

Function gelir(kümülatif_matrah, matrah)

sat = 4
ReDim a(sat)
ReDim b(sat)
ReDim c(sat)

vergi1 = 0
vergi2 = 0

rakam1 = kümülatif_matrah + matrah
rakam2 = kümülatif_matrah
'______________________________
'vergi dilimleri
a(1) = [COLOR="red"]12000[/COLOR]         '1. dilim
a(2) = [COLOR="red"]29000 [/COLOR]        '2. dilim
a(3) = [COLOR="red"]66000[/COLOR]         '3. dilim
a(4) = 500000000 * (rakam1) 'diğerleri
'______________________________
'yüzde oranları
b(1) = [COLOR="Red"]0.15[/COLOR]          '1. dilim
b(2) = [COLOR="red"]0.2  [/COLOR]         '2. dilim
b(3) = [COLOR="red"]0.27 [/COLOR]         '3. dilim
b(4) = 0.35          'diğerleri
'______________________________
c(1) = a(1)
c(2) = a(2) - a(1)
c(3) = a(3) - a(2)
c(4) = a(4) - a(3)

'______________________________

i = 1
While rakam1 > 0

'---------------------------------
If rakam1 >= c(i) Then
vergi1 = vergi1 + ((c(i) * b(i)) / 1)
rakam1 = rakam1 - c(i)
Else
vergi1 = vergi1 + ((rakam1 * b(i)) / 1)
rakam1 = 0
End If

'---------------------------------
If rakam2 >= c(i) Then
vergi2 = vergi2 + ((c(i) * b(i)) / 1)
rakam2 = rakam2 - c(i)
Else
vergi2 = vergi2 + ((rakam2 * b(i)) / 1)
rakam2 = 0
End If

'---------------------------------
i = i + 1
Wend

gelir = Round(vergi1 - vergi2, 2)

End Function