- Katılım
- 22 Mart 2005
- Mesajlar
- 847
- Excel Vers. ve Dili
- Excel-2003 TR.
- Altın Üyelik Bitiş Tarihi
- 29-06-2023
Merhaba;
Son kez ücretlilere ödenecek 2006 yılı için vergi iade oranları aşağıdaki gibi.
3600 Yeni Türk Lirasına kadar %8
7200 Yeni Türk Lirasının 3600 YTL için %8, aşan kısmı için %6'sı
7200 YTL fazlasının 7200 YTL için %7'si, aşan kısmı için %4'ü
Burada 7200 YTL fazlasının 7200 YTL'si için %7 denilmekte.
Aşağıdaki kodlarımı nasıl revize edebilirim.
Function Vergi_İade2006(toplam)
If toplam <= 3600 Then Vergi_İade2006 = Round(toplam * 0.08, 2)
If toplam > 3600 And toplam <= 7200 Then Vergi_İade2006 = Round((toplam - 3600) * 0.06, 2) + 288
If toplam > 7200 Then Vergi_İade2006 = Round((toplam - 7200) * 0.04, 2) + 504
End Function
Son kez ücretlilere ödenecek 2006 yılı için vergi iade oranları aşağıdaki gibi.
3600 Yeni Türk Lirasına kadar %8
7200 Yeni Türk Lirasının 3600 YTL için %8, aşan kısmı için %6'sı
7200 YTL fazlasının 7200 YTL için %7'si, aşan kısmı için %4'ü
Burada 7200 YTL fazlasının 7200 YTL'si için %7 denilmekte.
Aşağıdaki kodlarımı nasıl revize edebilirim.
Function Vergi_İade2006(toplam)
If toplam <= 3600 Then Vergi_İade2006 = Round(toplam * 0.08, 2)
If toplam > 3600 And toplam <= 7200 Then Vergi_İade2006 = Round((toplam - 3600) * 0.06, 2) + 288
If toplam > 7200 Then Vergi_İade2006 = Round((toplam - 7200) * 0.04, 2) + 504
End Function