DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
=YUVARLA(EĞER($AZ6-$AY6>=Genel!$F$19;0;EĞER($AZ6<Genel!$F$19;$AY6*0,15;(Genel!$F$19-($AZ6-$AY6))*0,15));2)=EĞER(YADA($AZ6<=Genel!$F$19;$AZ6-$AY6>Genel!$F$20);0;EĞER(($AZ6-$AY6)<Genel!$F$19;($AZ6-Genel!$F$19)*0,2;EĞER($AZ6<=Genel!$F$20;$AY6*0,2;EĞER($AZ6>Genel!$F$20;(Genel!$F$20-$AZ6+$AY6)*0,2;0))))=YUVARLA(EĞER($AZ6<=Genel!$F$20;0;EĞER($AZ6-$AY6>Genel!$F$20;$AY6*0,27;($AZ6-Genel!$F$21)*0,27));2)=YUVARLA(EĞER(C52-C53>ver3;C53*35%;EĞER(VE(C52>ver3;C52-ver3<C53);(C52-ver3)*35%+(ver3-C52+C53)*27%;EĞER(C52-C53>=ver2;C53*27%;EĞER(VE(C52>ver2;C52-ver2<C53);(C52-ver2)*27%+(ver2-C52+C53)*20%;EĞER(C52-C53>=ver1;C53*20%;EĞER(VE(C52>ver1;C52-ver1<C53);(C52-ver1)*20%+(ver1-C52+C53)*15%;C53*15%))))));2)=EĞER(VE(I8>vergi;I8-J8>vergi);YUVARLA(J8*0,2;2);EĞER(I8<=vergi;YUVARLA(J8*0,15;2);YUVARLA((I8-vergi)*0,2;2)+YUVARLA((vergi-(I8-J8))*0,15;2)))Bir dosyamda %15 için kullandığım formül:
=YUVARLA(EĞER($AZ6-$AY6>=Genel!$F$19;0;EĞER($AZ6<Genel!$F$19;$AY6*0,15;(Genel!$F$19-($AZ6-$AY6))*0,15));2)
%20 için kullandığım formül:
=EĞER(YADA($AZ6<=Genel!$F$19;$AZ6-$AY6>Genel!$F$20);0;EĞER(($AZ6-$AY6)<Genel!$F$19;($AZ6-Genel!$F$19)*0,2;EĞER($AZ6<=Genel!$F$20;$AY6*0,2;EĞER($AZ6>Genel!$F$20;(Genel!$F$20-$AZ6+$AY6)*0,2;0))))
%27 için kullandığım formül:
=YUVARLA(EĞER($AZ6<=Genel!$F$20;0;EĞER($AZ6-$AY6>Genel!$F$20;$AY6*0,27;($AZ6-Genel!$F$21)*0,27));2)
Başka bir dosyamda tek hücrede kullandığım formül :
=YUVARLA(EĞER(C52-C53>ver3;C53*35%;EĞER(VE(C52>ver3;C52-ver3<C53);(C52-ver3)*35%+(ver3-C52+C53)*27%;EĞER(C52-C53>=ver2;C53*27%;EĞER(VE(C52>ver2;C52-ver2<C53);(C52-ver2)*27%+(ver2-C52+C53)*20%;EĞER(C52-C53>=ver1;C53*20%;EĞER(VE(C52>ver1;C52-ver1<C53);(C52-ver1)*20%+(ver1-C52+C53)*15%;C53*15%))))));2)
Başka bir dosyamdaki formül:
=EĞER(VE(I8>vergi;I8-J8>vergi);YUVARLA(J8*0,2;2);EĞER(I8<=vergi;YUVARLA(J8*0,15;2);YUVARLA((I8-vergi)*0,2;2)+YUVARLA((vergi-(I8-J8))*0,15;2)))
Gördüğünüz gibi her dosyada farklı formüller kullanmışım. Sizin dosyanızdaki yapıyı bilmediğimizden nasıl bir formül yazılacağını da bilemeyiz. Örnek dosya paylaşırsanız yardımcı olmaya çalışırız.
Gv ay matrahı 7.090,48
BİRİKEN GV MATRAHI 38.232,41
TOPLAM GV MATRAHI 45.322,89
bu verilere sahip olan bir çalışanın ödenecek gv matrahını excelde hesaplamaya çalışıyorum
=YUVARLA(EĞER(AR2>=148000;AB2*0,35;EĞER(AT2>148000;(AT2-148000)*0,35+(148000-AR2)*0,27;EĞER(AR2>40000;AB2*0,27;EĞER(AT2>40000;(AT2-40000)*0,27+(40000-AR2)*0,2;EĞER(AR2>18000;AB2*0,2;EĞER(AT2>18000;(AT2-18000)*0,2+(18000-AR2)*0,15;AB2*0,15))))));2)Vergi Oranı | |||
İlk | 1.100.000,00 TL | için | 1% |
Sora Gelen | 2.600.000,00 TL | için | 3% |
Sora Gelen | 5.500.000,00 TL | için | 5% |
Sora Gelen | 10.900.000,00 TL | için | 7% |
Matrahın | 20.100.000,00 TL | yi aşan bölümü için | 10% |
benim şöyle bir sorum var; aşağıdaki tablo için excel formülü yazamadım, yardım ve desteklerinizi rica ederim. Saygılarımla,
Vergi Oranı
İlk
1.100.000,00 TL
için
1%
Sora Gelen
2.600.000,00 TL
için
3%
Sora Gelen
5.500.000,00 TL
için
5%
Sora Gelen
10.900.000,00 TL
için
7%
Matrahın
20.100.000,00 TL
yi aşan bölümü için
10%
Function GELIRBUL(matrah)
Dim a(6)
Dim b(6)
Dim c(6)
Dim d(6)
Dim vergi(6)
i = 1
vergi1 = 0
'______________________________
'yüzde oranları
b(1) = 0.01 '1. dilim
b(2) = 0.03 '2. dilim
b(3) = 0.05 '3. dilim
b(4) = 0.07 '4. dilim
b(5) = 0.1 '5. dilim
b(6) = 0.1 '6. diğerleri
'______________________________
'vergi dilimleri
c(1) = 1000 '1. dilim
c(2) = 2500 '2. dilim
c(3) = 5000 '3. dilim
c(4) = 10000 '4. dilim
c(5) = 20000 '5. dilim
c(6) = c(5) * matrah '6. diğerleri
'______________________________
d(1) = c(1)
d(2) = c(2) - c(1)
d(3) = c(3) - c(2)
d(4) = c(4) - c(3)
d(5) = c(5) - c(4)
d(6) = c(6) - c(5)
While matrah > 0
If matrah >= d(i) Then
a(i) = d(i)
vergi(i) = ((d(i) * b(i)) / 1)
matrah = matrah - d(i)
ElseIf matrah < d(i) Then
d(i) = matrah
matrah = matrah - d(i)
vergi(i) = ((d(i) * b(i)) / 1)
Else
vergi(6) = ((d(6) * b(6)) / 1)
End If
vergi1 = vergi1 + vergi(i)
i = i + 1
Wend
GELIRBUL = Round(vergi1, 2)
End Function
Çok teşekkür ederim emekleriniz için, excelde bunu nasıl yapabilirim?Bu kullanıcı tanımlı fonksiyonu bir dene
formülü bu =GELIRBUL(A1)
Rich (BB code):Function GELIRBUL(matrah) Dim a(6) Dim b(6) Dim c(6) Dim d(6) Dim vergi(6) i = 1 vergi1 = 0 '______________________________ 'yüzde oranları b(1) = 0.01 '1. dilim b(2) = 0.03 '2. dilim b(3) = 0.05 '3. dilim b(4) = 0.07 '4. dilim b(5) = 0.1 '5. dilim b(6) = 0.1 '6. diğerleri '______________________________ 'vergi dilimleri c(1) = 1000 '1. dilim c(2) = 2500 '2. dilim c(3) = 5000 '3. dilim c(4) = 10000 '4. dilim c(5) = 20000 '5. dilim c(6) = c(5) * matrah '6. diğerleri '______________________________ d(1) = c(1) d(2) = c(2) - c(1) d(3) = c(3) - c(2) d(4) = c(4) - c(3) d(5) = c(5) - c(4) d(6) = c(6) - c(5) While matrah > 0 If matrah >= d(i) Then a(i) = d(i) vergi(i) = ((d(i) * b(i)) / 1) matrah = matrah - d(i) ElseIf matrah < d(i) Then d(i) = matrah matrah = matrah - d(i) vergi(i) = ((d(i) * b(i)) / 1) Else vergi(6) = ((d(6) * b(6)) / 1) End If vergi1 = vergi1 + vergi(i) i = i + 1 Wend GELIRBUL = Round(vergi1, 2) End Function
Çok teşekkür ederim emekleriniz için, excelde bunu nasıl yapabilirim?
Çok teşekkür ederim, emekleriniz için.. Dosyayı iniremedim, alın üyelik gerekiyor, saygılarımla