Radians内部函数未定义

Question

为什么excel不断告诉我radians内部函数没有定义

这是我的函数定义：

Public Function Ev(x As Double, length As Integer, beta As Double, curvature As Double) As Double
    Dim height As Double

    beta = Radians(beta)
    height = Round(length * Tan(beta), 0)
    Ev = height * (1 - (x / length)) ^ curvature

End Function

Answer 1

为什么excel一直告诉我radians内部函数没有定义？

因为不存在！

改为使用WorksheetFunction：

beta = Application.WorksheetFunction.Radians(beta)