函数与过程入驻 VBA 编辑器

Excel技巧

2024-02-18 13:53:20

熟悉 VBA 编辑器（Visual Basic for Applications）对初学者来说是开启宏编程之旅的第一步。当打开编辑器时，你需要知道如何插入过程或函数，这样才能让你的代码功能正常运作。

本篇文章将为你介绍在 VBA 编辑器内插入过程或函数的两种方法。

方法一：使用“插入”选项卡下的“过程”或“函数”按钮

打开 VBA 编辑器后，你可以在菜单栏中找到“插入”选项卡，并在其下找到“过程”和“函数”两个按钮。

插入过程 ：点击此按钮可插入一个空的过程。过程与函数不同，过程没有返回值，而函数可以返回一个值。
插入函数 ：点击此按钮可插入一个空的函数。函数可以返回一个值，并且函数可以被其他过程或函数调用。

点击这两个按钮后，编辑器中会出现一个代码模板。在代码模板中，你会看到一些注释（以绿色显示）。这些注释告诉你要在代码模板中输入什么代码。

例如，如果你要插入一个名为“SumValues”的过程，你可以在代码模板中输入以下代码：

Sub SumValues()
    '这个过程计算选定单元格的总和
    '并将其显示在一个消息框中
    Dim total As Double
    Dim cell As Range

    '获取选定单元格
    Set cell = Application.Selection

    '计算选定单元格的总和
    total = 0
    For Each cell In Selection
        total = total + cell.Value
    Next cell

    '显示总和
    MsgBox "总和是" & total
End Sub

当你输入代码后，点击“保存”按钮即可将代码保存到模块中。

方法二：直接在代码窗口中输入 Sub 或 Function

除了使用“插入”选项卡下的“过程”或“函数”按钮外，你还可以直接在代码窗口中输入关键字 Sub 或 Function 来插入过程或函数。

例如，如果你要插入一个名为“SumValues”的过程，你可以在代码窗口中输入以下代码：

Sub SumValues()
    '这个过程计算选定单元格的总和
    '并将其显示在一个消息框中
    Dim total As Double
    Dim cell As Range

    '获取选定单元格
    Set cell = Application.Selection

    '计算选定单元格的总和
    total = 0
    For Each cell In Selection
        total = total + cell.Value
    Next cell

    '显示总和
    MsgBox "总和是" & total
End Sub