这是用户定义的功能,我在这里调用GoalSeek。
我把它放到模块中,但它没有解决给定的上下文。
Function FindYield() As Double
Worksheets("Sheet1").Range("N8").GoalSeek _
Goal:=0, _
ChangingCell:=Worksheets("Sheet1").Range("N9")
End Function
相同的设置可作为Sub。
答案 0 :(得分:0)
您需要使用 Sub 而不是函数。函数只能将值返回到它们所在的单元格。