Office学习社区 › 公式和函数 › 自定义函数传参数出错

立川 发表于 2021-9-23 19:35:00

自定义函数传参数出错

见图，第三列是用自定义函数“lssl”计算的， 第四列是用公式计算的。
Function lssl(x1, x2, y1, y2)
Dim x, y
x = (x1 - x2) * (x1 - x2)
y = (y1 - y2) * (y1 - y2)
lssl = Application.sqrt(x + y)
End Function
这个自定义函数的计算不正确，是不是函数传参数时出了错误，请各位大神指点一二，谢谢！

可可爹滴 发表于 2021-10-2 17:57:00

Function lssl(x1, x2, y1, y2)
Dim x, y
x = (x1 - x2) * (x1 - x2)
y = (y1 - y2) * (y1 - y2)
lssl = Sqr(x + y)
End Function

查看完整版本: 自定义函数传参数出错