VBA简单函数的创建与使用
时间: 2024-11-29 20:32:27 浏览: 0
在VBA中,创建一个简单的函数通常包括以下几个步骤:
1. **声明函数**: 使用 `Function` 关键字定义函数名称、输入参数(如果有)以及返回类型。例如,我们想创建一个计算两个整数之和的函数:
```vba
Function AddNumbers(num1 As Integer, num2 As Integer) As Integer
```
2. **函数体**: 写入实际的计算逻辑。这里是简单的加法:
```vba
AddNumbers = num1 + num2
```
3. **结束函数**: 使用 `End Function` 结束函数定义。
4. **调用函数**: 要使用该函数,只需在其名字后面加上圆括号并传递参数。例如:
```vba
Dim result As Integer
result = AddNumbers(5, 7)
Debug.Print "The sum is: ", result
```
完整的例子:
```vba
Function AddNumbers(num1 As Integer, num2 As Integer) As Integer
AddNumbers = num1 + num2
End Function
Sub TestAddNumbers()
Dim result As Integer
result = AddNumbers(5, 7)
Debug.Print "The sum of 5 and 7 is: ", result
End Sub
```
这个`TestAddNumbers` 子程序会调用 `AddNumbers` 函数并将结果打印出来。
阅读全文