Hallo Keni
Ja klar, kann man Dein Code zum Einlesen der Werte verwenden.
Ich habe vorher Deine Formel falsch abgeschrieben. Kannst Du die Zeile
aktienkurs(t + 1) = .....
in meinem Code durch
aktienkurs(t + 1) = aktienkurs(t) * Exp((zins - 0.5 * sigma ^ 2) + sigma * Application.WorksheetFunction.Norm_Inv(Rnd, 0, 1))
ersetzen und es dann nochmals versuchen? Falls etwas nicht klappt, gib mir bitte genau an, ob Du eine Fehlermeldung oder falsche Werte erhalten hast. Bei einer Fehlermeldung, muss ich wissen in welcher Zeile des Codes der Fehler auftritt. (Beim Testen in einem neuem Excel-File hat es jeweils nur ein Sheet, Du musst zuerst noch ein weiteres öffnen, ansonst erhältst Du eine Fehlermeldung, weil er kein Sheets(2) findet.)
Meine fixen Werte (z.B. aktienkurs(0) , zins, etc) kannst Du durch Deine eingelesen Werte ersetzen, aber teste es zuerst mit fixen Werten.
Liebe Grüsse
|