Excel VBA 函数教程:返回、调用、示例

什么是函数?

函数是执行特定任务并返回结果的一段代码。函数主要用于执行重复性任务,例如格式化数据以供输出、执行计算等。

假设您正在开发一个计算贷款利息的程序。您可以创建一个接受贷款金额和还款期的函数。然后该函数可以使用贷款金额和还款期来计算利息并返回值。

为什么要使用函数

使用函数的优点与上面关于为什么使用子程序的部分中的优点相同。

函数命名规则

函数命名规则与上面子程序命名规则相同。

用于声明函数的 VBA 语法

Private Function myFunction (ByVal arg1 As Integer, ByVal arg2 As Integer)
    myFunction = arg1 + arg2
End Function

语法中,

代码 操作
  • “私有函数 myFunction(…)”
  • 这里使用关键字“Function”声明一个名为“myFunction”的函数,并启动该函数的主体。
  • 关键字“Private”用于指定函数的范围
  • “ByVal arg1 作为整数,ByVal arg2 作为整数”
  • 它声明了两个整数数据类型的参数,分别名为“arg1”和“arg2”。
  • 我的函数 = arg1 + arg2
  • 计算表达式 arg1 + arg2 并将结果赋给函数名称。
  • “结束函数”
  • “End Sub”用于结束函数体

示例演示的功能:

函数与子程序非常相似。子程序与函数之间的主要区别在于,函数在调用时会返回一个值。而子程序在调用时不会返回值。假设您要将两个数字相加。您可以创建一个接受两个数字并返回这两个数字之和的函数。

  1. 创建用户界面
  2. 添加函数
  3. 编写命令按钮的代码
  4. 测试代码

步骤1) 用户界面

向工作表添加一个命令按钮,如下所示

VBA 函数和子程序

将 CommanButton1 的以下属性设置为以下内容。

S / N 通过积极争取让商标与其相匹配的域名优先注册来维护 特性 价值
1 命令按钮 1 名称 按钮添加Numbers
2 标题 添加 Numbers 功能


您的界面现在应该显示如下

VBA 函数和子程序

步骤2) 功能代码。

  1. 按 Alt + F11 打开代码窗口
  2. 添加以下代码
Private Function addNumbers(ByVal firstNumber As Integer, ByVal secondNumber As Integer)
    addNumbers = firstNumber + secondNumber
End Function

在代码中,

代码 操作
  • “私人功能添加Numbers(......)“
  • 它声明了一个私有函数“addNumbers”它接受两个整数参数。
  • “ByVal 第一个数字作为整数,ByVal 第二个数字作为整数”
  • 它声明了两个参数变量 firstNumber 和 secondNumber
  • “添加Numbers =第一个数字+第二个数字”
  • 它将 firstNumber 和 secondNumber 值相加,并将总和赋给 addNumbers.

步骤 3)编写调用该函数的代码

  1. 右键单击 btnAddNumbers_单击命令按钮
  2. 选择查看代码
  3. 添加以下代码
Private Sub btnAddNumbersFunction_Click()
    MsgBox addNumbers(2, 3)
End Sub

在代码中,

代码 操作
“信息Box 加Numbers(2,3)“
  • 它调用函数 addNumbers 并传入 2 和 3 作为参数。该函数返回两个数字之和五 (5)

步骤4) 运行程序,会得到以下结果

VBA 函数和子程序

下载包含上述代码的 Excel

下载上述 Excel 代码

结语

  • 函数是执行特定任务的一段代码。函数执行后会返回一个值。
  • 子程序和函数均提供代码可重用性
  • 子程序和函数都有助于将大块代码分解为易于管理的小代码。

总结一下这篇文章: