Vergi Hesaplarını Yapma

Bu dosya, A sütununa girilen toplam tutarlar üzerinden gelir vergisini ve damga vergisini hesaplar. Hesaplama formülle değil VBA makrosuyla yapılır; sonuçlar yan sütunlara yazılır. Vergi dilimleri 2006 yılı oranlarına göre tanımlıdır.

Dosyanın içeriği​

Dosyada exceldestek.com | exceldepo.com adlı tek sayfa bulunur (A1:K43).

• A sütunu: "Toplam Tutar" başlığı altında 1000'den başlayan örnek tutarlar listelenir.
• B, C ve D sütunları: makro çalışınca vergi tutarları bu sütunlara yazılır. C sütununun başlığı "Damga Vergisi"dir.
• G ve I sütunları: "Rakam" ve "Vergi" başlıklarıyla dilim üst sınırları (7000, 16000, 40000) ve bu sınırlardaki birikmiş vergi tutarları (1050, 2850) yer alır.

Makrolar​

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kodda dosya silme veya dışarıya bağlantı gibi işlem yoktur.

• Vergiler: B2:D100 aralığını temizler, A sütunundaki her tutar için sonuçları yazar. B sütununa gelir vergisini, C sütununa damga vergisini, D sütununa ikisinin yuvarlanmış toplamını yazar.
• UGV2006: Gelir vergisini dilimli hesaplar: 7.000'e kadar %15, 16.000'e kadar %20, 40.000'e kadar %27, üzeri %35. Her dilimde önceki dilimlerin birikmiş vergisi eklenir.
• DV0_006: Tutarın binde 6'sı oranında damga vergisini hesaplar.
• YTLYuvarla: Sonuçları iki ondalık basamağa yuvarlar.
• UGV2006Hucreden: UGV2006 ile aynı hesabı yapar; dilim sınırlarını koddan değil G2, G3 ve G4 hücrelerinden okur. Oranlar ve birikmiş tutarlar kodda sabittir.

UGV2006, DV0_006 ve UGV2006Hucreden fonksiyonları kullanıcı tanımlı fonksiyon olarak da hücrelerde çağrılabilir.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. A2 hücresinden başlayarak hesaplanacak toplam tutarları alt alta girin.
3. Alt+F8 ile makro listesini açın, Vergiler makrosunu seçip çalıştırın.
4. B, C ve D sütunlarında gelir vergisi, damga vergisi ve toplam vergi listelenir.
5. Makro B2:D100 aralığını her çalışmada temizlediği için bu alana elle girilen veriler silinir; sonuçları başka bir yere kopyalayarak saklayın.