Vekalet Ücreti

[redbox]

Herkese merhaba. Forumda yeniyim. Yaşım 27, İstanbul Pendik'te ikamet ediyorum, Anadolu Adliyesinde zabıt katibi olarak çalışıyorum.

Vekalet ücretlerini otomatik hesaplayan bir excel tablosu yapmak için 2 gündür uğraşıyorum. Çeşitli örnekleri düzenleyerek gitmeye çalıştım fakat başarılı olamadım. Yapmak istediğim excel tablosu şöyle;

Önceden yapılmış taslakları düzenliyorum fakat hep eksik rakamlar elde ediyorum.
Çok uğraştım yapamadım epeyce moralim bozuldu.
Yardımcı olabileceklere şimdiden teşekkürler.

 

[YUSUF44]

Yardımcı olabilmek için örnek excel dosyası paylaşmanız iyi olur. Hata nerde, nasıl düzeltilebilir görmeden bir şey diyemeyiz.

 

[redbox]

Yardımcı olabilmek için örnek excel dosyası paylaşmanız iyi olur. Hata nerde, nasıl düzeltilebilir görmeden bir şey diyemeyiz.

Eve geçince yükleyeceğim. İşyerinde bilgisayar müsade etmiyor.

 

[shaqzilla]

Merhaba,

2020 vekalet ücreti oranlarına göre hesaplama yapabileceğiniz excel dosyasını buradan indirebilirsiniz.

 

[redbox]

Merhaba,

2020 vekalet ücreti oranlarına göre hesaplama yapabileceğiniz excel dosyasını buradan indirebilirsiniz.

Bu icra daireleri için. Benim hazırladığım taslak Sulh Hukuk Mahkemeleri için olacak.

İndir

Dosyayı indir

dosya.co

uğraştım bu kadar yapabildim ama eksik hesaplıyor bir bakıp yardımcı olursanız çok memnun olurum

 

[YUSUF44]

Son yüklediğiniz dosya muhtemelen sayın İdris Serdar'ın hazırladığı bir dosya ya da onun hazırladığı dosyada değişiklik yaparak oluşturmuşsunuz. Özellikle matematiksel işlemlerde sayın İdris Serdar'ın hazırladığı çözümler sorunu basitçe çözen ve çok iyi hazırlanmış çözümlerdir, bir hata olacağını sanmıyorum. Örnek dosyanızda da bu durum görünüyor:

G2 hücresinde bulunan sonuç 56.000 TL için 7.870 TL ve tablonuzdaki değerleri ayrı ayrı değerlendirdiğimizde
40.000 TL için %15 ==> 6.000 TL
10.000 TL için %13 ==> 1.300 TL
6.000 TL için %9,5 ==> 570 TL

Olmak üzere toplam 7.870 TL olarak hesaplanıyor. Yani G2 hücresindeki formülünüz doğru sonuç veriyor.

G4 hücresindeki formülde ise basamaklar B sütununuzdaki verilerden farklı. Tablonuzdaki verileriniz

{0\40000\50000\90000\250000\620000\775000\1275000\3100000}

iken G4 hücresindeki verileriniz

{0\30000\70000\140000\390000\990000\1740000\3140000\6140000})

Halbuki örnek dosyanızdaki verilere göre G4 hücrenizdeki formül şöyle olmalıydı:

=TOPLA.ÇARPIM(--(A1>{0\40000\50000\90000\250000\620000\775000\1275000\3100000});--(A1-{0\40000\50000\90000\250000\620000\775000\1275000\3100000});{0,15\-0,02\-0,035\-0,025\-0,02\-0,015\-0,017\-0,008\-0,005})

Şeklinde. Dolayısıyla farklı verilerden farklı sonuçlar çıkması kadar doğal bir şey olamaz değil mi?

Eğer hala herhangi bir hata olduğunu düşünüyorsanız dosyanızda "şu verileri şu nedenden dolayı şu sonucu vermesi gerekirken şu sonucu veriyor" şeklinde örnekle gösterin lütfen.

 

[redbox]

Son yüklediğiniz dosya muhtemelen sayın İdris Serdar'ın hazırladığı bir dosya ya da onun hazırladığı dosyada değişiklik yaparak oluşturmuşsunuz. Özellikle matematiksel işlemlerde sayın İdris Serdar'ın hazırladığı çözümler sorunu basitçe çözen ve çok iyi hazırlanmış çözümlerdir, bir hata olacağını sanmıyorum. Örnek dosyanızda da bu durum görünüyor:

G2 hücresinde bulunan sonuç 56.000 TL için 7.870 TL ve tablonuzdaki değerleri ayrı ayrı değerlendirdiğimizde
40.000 TL için %15 ==> 6.000 TL
10.000 TL için %13 ==> 1.300 TL
6.000 TL için %9,5 ==> 570 TL

Olmak üzere toplam 7.870 TL olarak hesaplanıyor. Yani G2 hücresindeki formülünüz doğru sonuç veriyor.

G4 hücresindeki formülde ise basamaklar B sütununuzdaki verilerden farklı. Tablonuzdaki verileriniz

{0\40000\50000\90000\250000\620000\775000\1275000\3100000}

iken G4 hücresindeki verileriniz

{0\30000\70000\140000\390000\990000\1740000\3140000\6140000})

Halbuki örnek dosyanızdaki verilere göre G4 hücrenizdeki formül şöyle olmalıydı:

=TOPLA.ÇARPIM(--(A1>{0\40000\50000\90000\250000\620000\775000\1275000\3100000});--(A1-{0\40000\50000\90000\250000\620000\775000\1275000\3100000});{0,15\-0,02\-0,035\-0,025\-0,02\-0,015\-0,017\-0,008\-0,005})

Şeklinde. Dolayısıyla farklı verilerden farklı sonuçlar çıkması kadar doğal bir şey olamaz değil mi?

Eğer hala herhangi bir hata olduğunu düşünüyorsanız dosyanızda "şu verileri şu nedenden dolayı şu sonucu vermesi gerekirken şu sonucu veriyor" şeklinde örnekle gösterin lütfen.

Öncelikle cevabınız ve yardımlarınız için teşekkür ediyorum. Doğrudur İdris Serdar'ın örneklerinden biri.

G4 hücresindeki hesap hatalı evet çünkü o hücreyi düzenlemedim benim işim G2 hücresi ile. G2 hücresi normalde 8.080 TL sonucunu vermesi gerekirken 7.870 TL sonucu veriyor. Sebebi ise şu;
A1 hücresi 56.000 TL
İlk 40.000 TL x %15 = 6.000 TL
Sonra gelen 16.000 x %13 = 2.080 TL
Yani toplam 8.080 TL etmesi gerekirken, hesap bu şekilde olması gerekirken

40.000 TL için %15 ==> 6.000 TL
10.000 TL için %13 ==> 1.300 TL
6.000 TL için %9,5 ==> 570 TL şeklinde bir hesap yapıyor. Halbuki 40.000-10.000-6.000 diye değil de 40.000-16.000 şeklinde hesap yapması gerekir. Benim yukarıda linkini paylaştığım excel tablosunda G4 hücresi ile işim yok yani. G2'nin doğru sonucu vermesini istiyorum. 7.870 değil 8.080 TL vermeli.

Teşekkürler.

 

[YUSUF44]

Peki neden 10000+6000 değil de 16000 olması gerekiyor? Tablodaki basamaklandırma nasıl yorumlanacak?

 

[halit3]

Tablonuz bana göre böyle olmalı E sutununda 56000 dağılımı var f sutunundada sonuç var

 

[YUSUF44]

Peki neden 10000+6000 değil de 16000 olması gerekiyor? Tablodaki basamaklandırma nasıl yorumlanacak?

İlk mesajınıza tekrar baktım ve soruyu yanlış yorumladığımızı anladım. 50 bin ikinci basamak değil ikinci basamaktaki toplam tutarmış. Yani ikinci basamak 50 bin değil 40 +50=90 binmiş. Eğer tablonuzda kademeleri ayrı ayrı değil birbirinin üstüne ekleyerek yazarsanız formül doğru sonuç verecektir.

40000
90000
180000
430000

Gibi

 

[halit3]

Bu kullanıcı fonksiyonu denermisiniz.
uygulama
=vekalet(A1)

Function vekalet(Sayi)
sat = 9
ReDim a(sat)
ReDim b(sat)
ReDim c(sat)
ReDim vergi1(sat)
deg1 = 0
i = 1


'vergi dilimleri
a(1) = 40000         '1. dilim
a(2) = 50000         '2. dilim
a(3) = 90000         '3. dilim
a(4) = 250000        '4. dilim
a(5) = 620000        '5. dilim
a(6) = 7750000       '6. dilim
a(7) = 12750000      '7. dilim
a(8) = 3100000       '8. dilim
a(9) = a(8) * (Sayi)


'______________________________
'yüzde oranları
b(1) = 0.15           '1. dilim
b(2) = 0.13           '2. dilim
b(3) = 0.095          '3. dilim
b(4) = 0.7            '4. dilim
b(5) = 0.5            '5. dilim
b(6) = 0.035          '6. dilim
b(7) = 0.018          '7. dilim
b(8) = 0.1            '8. dilim
b(9) = 0.1            'diğerleri
'______________________________
c(1) = a(1)
c(2) = a(2) + a(1)
c(3) = a(3) + a(2)
c(4) = a(4) + a(3)
c(5) = a(5) + a(4)
c(6) = a(6) + a(5)
c(7) = a(7) + a(6)
c(8) = a(8) + a(7)
c(9) = a(9) '+ a(8)
'______________________________


While Sayi > 0
If Sayi >= c(i) Then
vergi1(i) = ((c(i) * b(i)) / 1)
Sayi = Sayi - c(i)
'ElseIf sayi < c(i) Then
Else
c(i) = Sayi
Sayi = Sayi - c(i)
vergi1(i) = ((c(i) * b(i)) / 1)
'Else
'vergi1(6) = ((c(6) * b(6)) / 1)
End If

deg1 = deg1 + vergi1(i)
i = i + 1
Wend


vekalet = Round(deg1, 2)

End Function

 

[YUSUF44]

Formüllü olarak hazırladığım dosyayı inceleyiniz. Dosyada her kademe için ayrı hesaplama yapılmıştır:

vekalet üreti hesaplama.xlsx

drive.google.com

 

[redbox]

Bu kullanıcı fonksiyonu denermisiniz.
uygulama
=vekalet(A1)

Function vekalet(Sayi)
sat = 9
ReDim a(sat)
ReDim b(sat)
ReDim c(sat)
ReDim vergi1(sat)
deg1 = 0
i = 1


'vergi dilimleri
a(1) = 40000         '1. dilim
a(2) = 50000         '2. dilim
a(3) = 90000         '3. dilim
a(4) = 250000        '4. dilim
a(5) = 620000        '5. dilim
a(6) = 7750000       '6. dilim
a(7) = 12750000      '7. dilim
a(8) = 3100000       '8. dilim
a(9) = a(8) * (Sayi)


'______________________________
'yüzde oranları
b(1) = 0.15           '1. dilim
b(2) = 0.13           '2. dilim
b(3) = 0.095          '3. dilim
b(4) = 0.7            '4. dilim
b(5) = 0.5            '5. dilim
b(6) = 0.035          '6. dilim
b(7) = 0.018          '7. dilim
b(8) = 0.1            '8. dilim
b(9) = 0.1            'diğerleri
'______________________________
c(1) = a(1)
c(2) = a(2) + a(1)
c(3) = a(3) + a(2)
c(4) = a(4) + a(3)
c(5) = a(5) + a(4)
c(6) = a(6) + a(5)
c(7) = a(7) + a(6)
c(8) = a(8) + a(7)
c(9) = a(9) '+ a(8)
'______________________________


While Sayi > 0
If Sayi >= c(i) Then
vergi1(i) = ((c(i) * b(i)) / 1)
Sayi = Sayi - c(i)
'ElseIf sayi < c(i) Then
Else
c(i) = Sayi
Sayi = Sayi - c(i)
vergi1(i) = ((c(i) * b(i)) / 1)
'Else
'vergi1(6) = ((c(6) * b(6)) / 1)
End If

deg1 = deg1 + vergi1(i)
i = i + 1
Wend


vekalet = Round(deg1, 2)

End Function

Ekli dosyayı görüntüle 213297

Cevap için teşekkür ederim. Yalnız kodu nasıl gireceğimi bilmiyorum açıkcası.

 

[redbox]

Formüllü olarak hazırladığım dosyayı inceleyiniz. Dosyada her kademe için ayrı hesaplama yapılmıştır:

vekalet üreti hesaplama.xlsx

drive.google.com

Yusuf bey yardımlarınız için çok teşekkür ediyorum. Linkini eklediğiniz excel tablosu doğru hesaplama yapıyor. İnceledim. Ellerinize sağlık.

 

[halit3]

Cevap için teşekkür ederim. Yalnız kodu nasıl gireceğimi bilmiyorum açıkcası.

Bir excel dosyası aç Klavyede Alt+F11 tuşlarına birlikte bas yukarıdaki menülerden insert/module tıkla bu kodları oraya yapıştır.
Excel sayfasında A1 hücresine 56000 yaz B1 hücresine şu formülü yaz =vekalet(A1)
ekran görüntüsünü 3 aşamalı ekliyorum

kodların çalışması için aşağıdaki linkdeki işlemleri yapmış olmanız gerekiyor.

https://www.excel.web.tr/threads/ofis-2003-ue-ilk-kullananlar-icin-makro-guevenlik-duezeyi.104854/

https://www.excel.web.tr/threads/ofis-2007-yi-ilk-kullananlar-icin-makro-guevenlik-duezeyi.104852/

Function vekalet(Sayi)
sat = 9
ReDim a(sat)
ReDim b(sat)
ReDim c(sat)
ReDim vergi1(sat)
deg1 = 0
i = 1


'vergi dilimleri
a(1) = 40000         '1. dilim
a(2) = 50000         '2. dilim
a(3) = 90000         '3. dilim
a(4) = 250000        '4. dilim
a(5) = 620000        '5. dilim
a(6) = 7750000       '6. dilim
a(7) = 12750000      '7. dilim
a(8) = 3100000       '8. dilim
a(9) = a(8) * (Sayi)


'______________________________
'yüzde oranları
b(1) = 0.15           '1. dilim
b(2) = 0.13           '2. dilim
b(3) = 0.095          '3. dilim
b(4) = 0.7            '4. dilim
b(5) = 0.5            '5. dilim
b(6) = 0.035          '6. dilim
b(7) = 0.018          '7. dilim
b(8) = 0.1            '8. dilim
b(9) = 0.1            'diğerleri
'______________________________
c(1) = a(1)
c(2) = a(2) + a(1)
c(3) = a(3) + a(2)
c(4) = a(4) + a(3)
c(5) = a(5) + a(4)
c(6) = a(6) + a(5)
c(7) = a(7) + a(6)
c(8) = a(8) + a(7)
c(9) = a(9) '+ a(8)
'______________________________


While Sayi > 0
If Sayi >= c(i) Then
vergi1(i) = ((c(i) * b(i)) / 1)
Sayi = Sayi - c(i)
'ElseIf sayi < c(i) Then
Else
c(i) = Sayi
Sayi = Sayi - c(i)
vergi1(i) = ((c(i) * b(i)) / 1)
'Else
'vergi1(6) = ((c(6) * b(6)) / 1)
End If

deg1 = deg1 + vergi1(i)
i = i + 1
Wend


vekalet = Round(deg1, 2)

End Function