Thema Datum  Von Nutzer Rating
Antwort
Rot Formel für Zinseszins Berechnung ergibt immer den Wert CHF0.00
18.03.2021 15:23:04 Markus
NotSolved
18.03.2021 15:31:32 Gast85392
NotSolved
19.03.2021 11:44:23 Markus
NotSolved
19.03.2021 20:11:34 Gast44385
Solved

Ansicht des Beitrags:
Von:
Markus
Datum:
18.03.2021 15:23:04
Views:
325
Rating: Antwort:
  Ja
Thema:
Formel für Zinseszins Berechnung ergibt immer den Wert CHF0.00

Hallo zusammen,

ich versuche seit einiger Zeit mir eine Formel für die Berechnung des Zineszins zu programmieren. Leider wird immer der Wert " CHF 0.00" in die Zelle geschrieben.

 

Hier mein Code:

Dim AnzahlDurchläufe As Integer
Dim v As Integer
Dim t As Double
Dim Endkapital As Double
Dim Anfangskapital As Double

Function ZinsesZins(AnzahlDurchläufe As Integer, Anfangskapital As Double, Zinsrate As Double) As Double

    i = 1
    t = Anfangskapital
    Do While i <= AnzahlDurchläufe
        v = t * Zinsrate
        t = v
        i = i + 1
    Loop
    Endkapital = t
    Sheets("Tabelle1").Range("B5").Value = Endkapital
    

End Function

 

Bin für jede Hilfe dankbar.

 

Gruss Markus


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Formel für Zinseszins Berechnung ergibt immer den Wert CHF0.00
18.03.2021 15:23:04 Markus
NotSolved
18.03.2021 15:31:32 Gast85392
NotSolved
19.03.2021 11:44:23 Markus
NotSolved
19.03.2021 20:11:34 Gast44385
Solved