Microsoft Office Tutorials and References
In Depth Information
Select Case zinsabrechnung
Case "jährlich"
m = 1
Case "halbjährlich"
m = 2
Case "vierteljährlich"
m = 4
Case "monatlich"
m = 12
Case "täglich"
m = 360
End Select
Select Case zinszeitraum
Case "Jahr"
fi = 1
Case "Monat"
fi = 1 / 12
End Select
i = zinssatz
j = (1 + i / (fi * m)) ^ m – 1
kn = anfangskapital * (1 + j) ^ (anzahl_perioden * fn)
endkapital = kn
End Function
Abbildung 16.8 Zinseszinsberechnung mit variablen Abrechnungsperioden
Die zweite Funktion zur Berechnung des Effektivzinses sieht so aus:
Search JabSto ::




Custom Search