Hallo Holger,
danke für Deine Antwort, ich habe es mit folgedem Code versucht. Leider klappt es nicht so richtig.
Hinter bprice (dem referenzierten Feld) steht eine Formel, die einen Wert berechnet, der auf meinen Zufallszahlen basiert. Das funktioniert.
Die Zufallszahlen werden ebnefalls auf dem Sheet selbst generiert.
nsim ist einfach die Anzahl an Simulationsdurchläufen.
Kannst Du mir noch einen Tipp geben woran es liegt, dass kein Wert berechnet wird?
Danke und Grüße,
Jue
Function PriceBond(bprice, nsim) As Double
Dim isim As Double 'Hilfsvariable
Dim intbprice As Double 'Hilfsvariable
For isim = 1 To nsim
intbprice = bprice + intbprice
isim = isim + 1
Worksheets("MC").Refresh
Next isim
PriceBond = intbprice / isim
End Function