merhaba arkadaşlar; elimde brütten nete maaş hesaplamasını yaptırabilecek bir program var. ama bu program vergi kesintisini yüzde 15 ten ödüyor. bense kişilerin net maaşlarını girince kümülatif vergi matrahına göre net ödeneni çıakrabilecek bir excel istorum elinde olan veya yardımcı olabilecek birisi varmı
-
DİKKAT DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
ücret hesaplama
- Konbuyu başlatan muraty
- Başlangıç tarihi
- Katılım
- 8 Haziran 2007
- Mesajlar
- 761
- Excel Vers. ve Dili
- excel- 2003 Türkçe
Örnek Bİr Dosya GÖndersen Daha İyİ Olur Sanirim
- Katılım
- 8 Haziran 2007
- Mesajlar
- 761
- Excel Vers. ve Dili
- excel- 2003 Türkçe
Function VERGİ2007(KümlatifMatrah As Double, VergiMatrahi As Double)
If KümlatifMatrah + VergiMatrahi <= 7500# Then VERGİ2007 = 0.15 * VergiMatrahi: Exit Function
If KümlatifMatrah + VergiMatrahi >= 7501# And KümlatifMatrah + VergiMatrahi <= 18000# Then
ilkoran = 0.15: ikincioran = 0.2: sontutar = 7500#: GoTo hesapla
ElseIf KümlatifMatrah + VergiMatrahi >= 18001# And KümlatifMatrah + VergiMatrahi <= 40000# Then
ilkoran = 0.2: ikincioran = 0.27: sontutar = 18000#: GoTo hesapla
ElseIf KümlatifMatrah + VergiMatrahi >= 40001# Then
ilkoran = 0.27: ikincioran = 0.35: sontutar = 40000#: GoTo hesapla
End If
hesapla:
If KümlatifMatrah <= sontutar Then
VERGİ2007 = ilkoran * ((sontutar - KümlatifMatrah)) + ikincioran * (((KümlatifMatrah + VergiMatrahi) - sontutar))
Else
VERGİ2007 = ikincioran * VergiMatrahi
End If
End Function
SONRA GELİR VERGİSİNİ HESAPLAYACAĞIN HÜCREYE BU FORMÜLÜ YAZ
'=YUVARLA(VERGİ2007(SÜREGELEN GELİR VERGİSİ MATRAHI;AYLIK VERGİ MATRAHI);2)
If KümlatifMatrah + VergiMatrahi <= 7500# Then VERGİ2007 = 0.15 * VergiMatrahi: Exit Function
If KümlatifMatrah + VergiMatrahi >= 7501# And KümlatifMatrah + VergiMatrahi <= 18000# Then
ilkoran = 0.15: ikincioran = 0.2: sontutar = 7500#: GoTo hesapla
ElseIf KümlatifMatrah + VergiMatrahi >= 18001# And KümlatifMatrah + VergiMatrahi <= 40000# Then
ilkoran = 0.2: ikincioran = 0.27: sontutar = 18000#: GoTo hesapla
ElseIf KümlatifMatrah + VergiMatrahi >= 40001# Then
ilkoran = 0.27: ikincioran = 0.35: sontutar = 40000#: GoTo hesapla
End If
hesapla:
If KümlatifMatrah <= sontutar Then
VERGİ2007 = ilkoran * ((sontutar - KümlatifMatrah)) + ikincioran * (((KümlatifMatrah + VergiMatrahi) - sontutar))
Else
VERGİ2007 = ikincioran * VergiMatrahi
End If
End Function
SONRA GELİR VERGİSİNİ HESAPLAYACAĞIN HÜCREYE BU FORMÜLÜ YAZ
'=YUVARLA(VERGİ2007(SÜREGELEN GELİR VERGİSİ MATRAHI;AYLIK VERGİ MATRAHI);2)
- Katılım
- 23 Temmuz 2007
- Mesajlar
- 48
- Excel Vers. ve Dili
- office2007
umarım işini görür
sakatlık oranları, gelir vergisi dilimlerine göre hesaplatma, ssk tavanını dikkate alma, yol ve yemek yardımı, yemek istisnasını düşme gibi özellikleriyle, umarım herkesin işine yarar.
sakatlık oranları, gelir vergisi dilimlerine göre hesaplatma, ssk tavanını dikkate alma, yol ve yemek yardımı, yemek istisnasını düşme gibi özellikleriyle, umarım herkesin işine yarar.
-
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.