excel - 用函数加两个数字

我正在编写VBA代码以添加两个数字：

Option Explicit

Dim x As Integer, y As Integer
Function addtwo(x, y)
addtwo = x + y
End Function

这不是一个好函数，因为我必须手动输入值x和y才能获得结果。如何修改代码，使其可以使用任意两个数字，无论是整数还是带小数的数字？

最佳答案

您可以在FUNCTION声明行（而不是其上方）中定义输入变量。我建议将vartype DOUBLE用于整数和小数。

Function ADDTWO(ByVal x As Double,ByVal  y As Double) As Double
    ADDTWO = x + y
End Function

现在，此功能可以在单元格中用作：

= ADDTWO（3，6）
要么
= ADDTWO（A2，B7）

它也可以在VBA中使用。

当然，SUM（）函数也可以执行相同的操作，所以...我想这是一个学习练习。

关于excel - 用函数加两个数字，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/10256108/