当前位置:首页 > 培训职业 > 正文

请问数学高手如何解高次幂的函数呢

比如在A1中显示i的值

右击工作表表头-------查看代码,,然后输入

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

dim i as integer

for i=1 to 1000

if 1000=600/(1+i)+400/(1+i)^2+300/(1+i)^3+700/(1+i) then

cells(1,1)=i

else

cells(1,1)=0

endif

End Sub

多重随机标签

猜你喜欢文章