将Excel功能导入我的模块

Question

我特意在VBA，Excel工作，并尝试使用SQRT（平方根）功能。我正在写一个模块但不知道如何导入SQRT函数，所以我的函数可以使用它。

Answer 1

这将返回一个平方根：

MsgBox 4 ^ (1 / 2)

Answer 2

这是我的答案， 希望这会有所帮助。

Function myFunction(rng As Range) As Double
    Dim i As Double
    i = rng.Value
    myFunction = Sqr(i)
    'this function returns the square root of the value of i
End Function

通过搜索而不费力Google show me这个

1：MS Excel: How to use the SQR Function (WS)

2：Create SquareRoot Function in VBA - MrExcel.com

还有更多。