大侠帮忙vba程序问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

<p>新手求救，查了好久都不知道那出问题，算出来option总是不对，好心大侠帮忙看看：</p><p>Function lookback(initial, up, down, interest, periods, runs)<br/>    Dim pricepath() As Double<br/>    ReDim pricepath(periods + 1)<br/>    <br/>     <br/>    'risk-neutral probabilities<br/>    piup = (interest - down) / (up - down)<br/>    pidown = 1 - piup<br/> <br/>    temp = 0<br/> <br/> For Index = 1 To runs<br/>  'generate path<br/>  For i = 1 To periods<br/>  pricepath(0) = initial<br/>  pathprob = 1<br/>  If Rnd > pidown Then<br/>     pricepath(i) = pricepath(i - 1) * up<br/>     <br/>     Else:<br/>     pricepath(i) = pricepath(i - 1) * down<br/>  End If<br/>  <br/>  Next i<br/>  priceminimum = Application.Min(pricepath)<br/>  callpayoff = Application.Max(pricepath(periods) - priceminimum, 0)<br/>  <br/>  temp = temp + callpayoff<br/>Next Index</p><p>lookback = (temp / interest ^ periods) / runs<br/>  </p><p>End Function<br/>跪谢。。。。。。。。。。</p>

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：VBA Application Abilities interest function generate interest initial periods option

提示什么错误