gelir vergisi hesaplama kodları

[METE]

İyi günler, Ã?ncelikle sitede emeği geçen herkese teşekkür ederim. benim sorum ekderslerde gelir vergsini nasıl hesaplatabılırım. öğrenğin a küçükse b den 015 büyükse 020 gibi

 

[Levent Menteşoğlu]

Merhaba

Ã?rneğin a değeri A1 hücresinden, b değeri B1 hücresinden alınsın, bu durumda formül aşağıdaki gibi düzenlenmelidir. 0,15 ve 0,20 yi ne ile çarpacaksanız formüldeki X yerine o değeri veya hücre adını yazın.

=EÐER(A1<B1;X*0,15;X*0,20)

 

[METE]

gelir vergisi hesaplama

Merhaba sorumu tam anlatamadım galıba şu förmülü vba da yazmak istiyorum, yardımcı olursanız sevinirim,Saygılarımla, =TAMSAYI(EÐER(K9<=6600;I9*0.15;EÐER(K9<=I9+6600;(K9-6600)*0.20+(I9-(K9-6600))*0.15;EÐER(K9<=15000;I9*0.20;EÐER(K9<=I9+15000;(K9-15000)*0.30+(I9-(K9-15000))*0.20; bu şekilde devam ediyor.

 

[Levent Menteşoğlu]

Aşağıdaki şekilde deneyin.


[vb:1:d603b90248]if [k9]<=6600 then [i9]*0,15
if [k9]<=([i9]+6600) then ([k9]-6600)*0,20+([i9]-([k9]-6600))*0.15
if [k9]<=([i9]+15000 then ([k9]-1500)*0,30+([i9]-([k9]-15000))*0,20
.
.
.


[/vb:1:d603b90248]

 

[METE]

başlık kısmı nasıl olmalı

 

[METE]

Ifsub
If [k9]<=6600 Then [i9]*0,15
If [k9]<=([i9]+6600) Then ([k9]-6600)*0,20+([i9]-([k9]-6600))*0.15
If [k9]<=([i9]+15000 Then ([k9]-1500)*0,30+([i9]-([k9]-15000))*0,20
Endsub

bu şekildemi olacak
birde bunu (m,k)değişken şekide yazabılırmıyım.

 

[maverick6]

Sayın Mete,


Function Gelir_Vergisi(Matrah)
a = Range("xxx").Value
b = Range("xxxx").Value
c = Range("x").Value
d = c * 0.15
e = (b - c) * 0.2 + d
f = (a - b) * 0.25 + e

If Matrah > 0 Then
If Matrah >= a Then
Gelir_Vergisi = f + ((Matrah - a) * 0.3)
ElseIf Matrah >= b Then
Gelir_Vergisi = e + ((Matrah - b) * 0.25)
ElseIf Matrah >= c Then
Gelir_Vergisi = d + ((Matrah - c) * 0.2)
Else
Gelir_Vergisi = Matrah * 0.15
End If
End If
End Function


A1'de ücret tutarı, B1'de de süregelen vergi matrahı toplamı olduğunu varsayarsak C1'e aşağıdaki formülü yazınca gelir vergisi hesaplanıyor.


=YUVARLA(Gelir_Vergisi((A1+B1))-Gelir_Vergisi(B1);2)

A1 %15
A2 %20
A3 %25

B1 6600 (Bu hücre x olarak tanımlanacak)
B2 14000 (Bu hücre xxxx olarak tanımlanacak)
B3 28000 (Bu hücre xxx olarak tanımlanacak)



bir yap bakalım nasıl olacak..

Bu makronun %30 limite göre tanımlamasını bir arkadaşımız yaparsa çok iyi olur.

 

[osan003]

Sayın Mete artık 2005 yılından itibaren gelir vergisi hesaplamalarında Tamsayı kullanılmıyor,yani senin anlayacağın YTL. ve YKR.yı kullanmak zorundasınız,çünkü Maliye Bakanlığı Muhasebat Genel Müdürlüğünün bu konuda kesin tebliği mevcut.Gelir vergisi hesaplamasına gelince formül ile daha kolay yapılabilir,birden çok personel var ise 20-50-100 gibi formülü çoğaltarak kullanması makroya göre çok çok daha kolay bu nedenle sizin örneğinize uygun formülü aşağıya yazıyorum,bendeniz de çalıştığım kurumda aynı formülle hesaplıyorum.Selamlar
=EÐER(A1+B1<6600;A1*0,15;EÐER(A1+B1>6600;((A1+B1)-6600)*0,2+(6600-B1)*0,15;EÐER(B1>6600;A1*0,2;0)))
Ayrıca dosyayıda ekliyorum. Osan003

 

[maverick6]

Dostum

Sayın Mete artık 2005 yılından itibaren gelir vergisi hesaplamalarında Tamsayı kullanılmıyor,yani senin anlayacağın YTL. ve YKR.yı kullanmak zorundasınız,çünkü Maliye Bakanlığı Muhasebat Genel Müdürlüğünün bu konuda kesin tebliği mevcut.Gelir vergisi hesaplamasına gelince formül ile daha kolay yapılabilir,birden çok personel var ise 20-50-100 gibi formülü çoğaltarak kullanması makroya göre çok çok daha kolay bu nedenle sizin örneğinize uygun formülü aşağıya yazıyorum,bendeniz de çalıştığım kurumda aynı formülle hesaplıyorum.Selamlar
=EÐER(A1+B1<6600;A1*0,15;EÐER(A1+B1>6600;((A1+B1)-6600)*0,2+(6600-B1)*0,15;EÐER(B1>6600;A1*0,2;0)))
Ayrıca dosyayıda ekliyorum. Osan003

Osan003, Dostum ben de kamu kurumunda çalışıyorum ve bendeki personel haziran ayına yakın 4. dilime (%30) a girecek senin yazdığın formülde sadece 1. dilim var. Ve formülde hata veriyor. Kontrol edip diğer dilimler için de formül yazarmısın.Aynı dert ben de de var..Teşekkürler..

 

[xxrt]

Ekli dosyada bir örnek var İnceleyin.

 

[maverick6]

linkte bir sorun var galiba, şu an indiremiyorum.

09/03/05-10:58

 

[ALPEN]

Linkte sorun yok. Þu an indiriyorum.
09/03/05-10:59

 

[maverick6]

bu dosyada sabit rakamın dilimleri göre yüzdesi bulunuyor. Bu işlem sadece özel gider indiriminde kullanılıyor. Gelir vergisinde ise bir matrah var bir de süregelen vergi matrahı var.
ekte gönderdiğim dosya gelir vergisi hesaplamasını tam anlamıyla anlatıyor. Vba ile yazılmış ve 3.dilim olan %25 e kadar hesaplanıyor. Vba bilen arkadaşlar bunu 4.dilime göre uyarlayabilirse, gelir vergisi olayı bitmiş olacaktır. Bir inceleyin ona göre yine tartışırız. Teşekkürler iyi çalışmalar.

 

[METE]

Teşekkur ederim. tam aradığım dosya fakat makroda acemi oluğum için kendi dosyama uyarlamam için 15% 6.600
20% 15.000
25% 30.000
30% 77.000
bunların sayfa dışındı tanımlanması lazim şimdiden teşekkür eder,yardımlarınzı bekler

 

[maverick6]

Teşekkur ederim. tam aradığım dosya fakat makroda acemi oluğum için kendi dosyama uyarlamam için 15% 6.600
20% 15.000
25% 30.000
30% 77.000
bunların sayfa dışındı tanımlanması lazim şimdiden teşekkür eder,yardımlarınzı bekler

Hocam, excelde herhangi bir sayfada tanımlarsan olur, şöyle :
6.600-15.000-30.000-.77.000 rakamlarının bulunduğu hücreyi
Ekle-Ad-Tanımla seçeneğinden tanımladıktan sonra işlem olacaktır.
Yalnız 4.dilim yapılmamış bu makroda.

Kolay gelsin

 

[osan003]

Sayın Mete Galiba linklerde sorun var xxrt nin dosyasını inceliyemedim.Forumdan mı kaynaklanıyor bilmiyorum. Etke gönderdiğim dosyada bütün dilimlere ait gelir vergisi hesaplamalarının yanında dilimler arası geçişteki hesapmalalarıda ayrıca yapmaktadır bir inceleyin bakalım Selamlar.

 

[METE]

Mehraba Ekle-Ad-Tanımla olayı denedim olmadı biraz daha ayrıntılı bilgi verirseniz sevinirim.ilginize teşekkürler kolay gelsin.

 

[maverick6]

osan003 dostum, xxrt nin yaptığı işlem, vergi iadesinde tek bir rakamı dilimlere ayırma meselesi var ya onu yapıyo. senin gönderdiğin dosya da güzel. VBA olarak yapabilirsek çok daha az formül kullanarak olacak.

Mete bence yapmak istediğin dosyayı gönder bir bakalım.
ben uyguladım oldu.

kolay gele

 

[veyselemre]

vergi hesapla

ekteki dosyadaki fonksiyon işinizi görür

 

[crackerdent]

usta ellerine sağlık epeydir uğraştığım bi sorunumu hallettin... :hey: