在另一个 UDF 中使用外接程序中的 UDF



我在Excel中加载了一个加载项,其中包含我所有的UDF。
其中之一被称为毕达哥拉斯。它的定义如下:

Function Pythagoras(Optional side1, Optional side2, Optional hypotenusa)
If Not (IsMissing(side1)) And Not (IsMissing(side2)) Then
    Pythagoras = Sqr(side1 ^ 2 + side2 ^ 2)
Else
    If Not (IsMissing(side1)) And Not (IsMissing(hypotenusa)) Then
        Pythagoras = Sqr(hypotenusa ^ 2 - side1 ^ 2)
    Else
        If Not (IsMissing(side2)) And Not (IsMissing(hypotenusa)) Then
            Pythagoras = Sqr(hypotenusa ^ 2 - side2 ^ 2)
        Else
            Pythagoras = "Please supply two arguments."
        End If
    End If
End If
End Function

它在"用户定义"列表中很好地显示并且工作得很好。

但是,我的问题是我似乎无法找到如何在另一个 UDF 中使用它。
这是不可能的事情吗?如果可能,我该怎么做?

看起来有点乱,但你可以这样引用函数:

retval = Application.Run("'NAME_OF_YOUR_ADDIN.xlam'!Pythagoras", s1, s2, ha)

最新更新