Gelir Vergisi hesaplama
Tarih
15/01/2012 01:54
Konu Sahibi
EGE35_m
Yorumlar
3
Okunma
1985
Konuyu Oyla:
  • Derecelendirme: 5/5 - 1 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 5/5 - 1 oy



EGE35_m
Üye
Kullanici Avatari
Üye
Y.... Ö....
10
3
21/06/2009
0
İzmir
Ofis 2010
20/11/2016,23:26
Gelir Vergisi hesaplama koduna ihtiyacım var
EGE35_m, 21-06-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla


WiniFred
Aktif Üye
Kullanici Avatari
Aktif Üye
121
25/09/2011
11
Zonguldak
-
28/11/2016,21:49
çok önceleri excel'de hazırlamıştım. Access'te denemedim. İnceleyin, problem olursa bakarız tekrar.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
    Function GelirVergisiHesapla(aylik_vergi_matrahi As Currency, toplam_vergi_matrahi As Currency) As Currency
    Dim ver_dilim1 As Currency, ver_dilim2 As Currency, ver_dilim3 As Currency
    Dim veror1 As Single, veror2 As Single, veror3 As Single
    
      ver_dilim1 = 10000
      ver_dilim2 = 25000
      ver_dilim3 = 88000
      
      veror1 = 0.15
      veror2 = 0.2
      veror3 = 0.27
      veror4 = 0.35

        If (aylik_vergi_matrahi + toplam_vergi_matrahi) <= ver_dilim1 Then

            GelirVergisiHesapla = Round(aylik_vergi_matrahi * veror1, 2)

        ElseIf (toplam_vergi_matrahi < ver_dilim1) And (aylik_vergi_matrahi + toplam_vergi_matrahi) > ver_dilim1 Then

            GelirVergisiHesapla = Round(((ver_dilim1 - toplam_vergi_matrahi) * veror1) + ((aylik_vergi_matrahi - (ver_dilim1 - toplam_vergi_matrahi)) * veror2), 2)

        ElseIf toplam_vergi_matrahi >= ver_dilim1 And toplam_vergi_matrahi < ver_dilim2 Then

            If (toplam_vergi_matrahi + aylik_vergi_matrahi) <= ver_dilim2 Then

                GelirVergisiHesapla = Round(aylik_vergi_matrahi * veror2, 2)

            ElseIf (toplam_vergi_matrahi < ver_dilim2) And (aylik_vergi_matrahi + toplam_vergi_matrahi) > ver_dilim2 Then

                GelirVergisiHesapla = Round(((ver_dilim2 - toplam_vergi_matrahi) * veror2) + ((aylik_vergi_matrahi - (ver_dilim2 - toplam_vergi_matrahi)) * veror3), 2)

            End If

        ElseIf toplam_vergi_matrahi >= ver_dilim2 And toplam_vergi_matrahi < ver_dilim3 Then


            If (toplam_vergi_matrahi + aylik_vergi_matrahi) <= ver_dilim3 Then

                GelirVergisiHesapla = Round(aylik_vergi_matrahi * veror3, 2)

            ElseIf (toplam_vergi_matrahi < ver_dilim3) And (aylik_vergi_matrahi + toplam_vergi_matrahi) > ver_dilim3 Then

                GelirVergisiHesapla = Round(((ver_dilim3 - toplam_vergi_matrahi) * veror3) + ((aylik_vergi_matrahi - (ver_dilim3 - toplam_vergi_matrahi)) * veror4), 2)

            End If
            
         ElseIf toplam_vergi_matrahi >= ver_dilim3 Then
         
            GelirVergisiHesapla = Round(aylik_vergi_matrahi * veror4, 2)
            
        End If

    End Function

Cevapla


simendifer

Kullanici Avatari
Onursal
E.... Ç....
869
30/10/2008
319
Çankırı
Ofis 2010 32 Bit
Dün,22:00
sevgili kardeşim sayın taruz hocamızın hazırladıgı bir program var alttaki link te incelemini tavsiye ederim kolay gelsin
http://www.accesstr.net/konu-ucretliler-...ir+vergisi
sayın assenucler abimizede teşekkür ederim
Ek Dosyalar
taruz_ÜcretliGelirVergiHesap.rar
[32.62 KB]
Cevapla


EGE35_m
Üye
Kullanici Avatari
Üye
Y.... Ö....
10
3
21/06/2009
0
İzmir
Ofis 2010
20/11/2016,23:26
EMEĞİNİZE SAĞLIK GEÇMİŞLERİNİZE RAHMET OLSUN
EGE35_m, 21-06-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Smile Yeni Site/Apartman Aidat Gelir/Gider Takip Programı gogoli01 45 17.758 28/11/2016, 05:09 mbo69221088
Information Gelir-Gider Programı bayFARUK 105 47.930 22/09/2016, 10:33 murat.orta
  ÖZEL ( ÜCRETLİ ) NAKİL HESAPLAMA PROGRAMI mntf02 3 636 29/12/2015, 17:16 mntf02
  Müşterek doğalgaz kullanım hesaplama programı simendifer 1 861 24/10/2015, 14:25 C*e*l*o*y*c*e
  İki Tarih Arası Gün Ay Yıl Hesaplama ozanakkaya 29 40.431 29/08/2015, 02:47 ozanakkaya


Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya