在 VBA 中编写过程（Sub）或函数（Function）时，若需向其传入变量，则必须明确指定每个参数的传递方式，主要分为以下两类：
- ByVal：按值传递
- ByRef：按引用传递
本文将围绕这两种传递机制展开讲解，涵盖基本语法、实际效果及核心差异。由于过程与函数在参数传递逻辑上高度一致，因此全文以 Sub 过程为例进行演示与分析。
当声明一个带参的过程或函数时，每个形参都应显式标注其传递方式——即使用 ByVal 或 ByRef 关键字修饰。
' 按值传递 Sub TestSub1(ByVal msg As String) End Sub ' 按引用传递 Sub TestSub2(ByRef msg As String) End Sub
对于基本数据类型（如整数、字符串、布尔值等），两种传递方式的行为对比如下：
- ByVal：调用时会为该变量生成一份独立副本，并将副本送入被调过程或函数。在此过程中对该参数所做的任何修改，仅作用于副本本身，原始变量不受影响。
- ByRef：调用时不复制变量内容，而是将其内存地址（即引用）传递过去。因此，在子过程中对该参数的更改，会直接反映到原始变量上。
ByVal 示例演示
运行以下代码观察 ByVal 的行为：
Sub Test()
Dim msg As String
msg = "main"
TestSub1 msg
MsgBox msg
End Sub
' 按值传递
Sub TestSub1(ByVal msg As String)
msg = "val"
End Sub
首先定义字符串变量 msg 并赋初值 "main"；接着调用 TestSub1，传入该变量；在子过程中将其更改为 "val"；最后回到主过程并弹窗显示 msg。结果可见，弹出内容仍为 "main"，说明原变量未被改变。
ByRef 示例演示
再来看 ByRef 的实际效果：
Sub Test()
Dim msg As String
msg = "main"
TestSub2 msg
MsgBox msg
End Sub
' 按引用传递
Sub TestSub2(ByRef msg As String)
msg = "ref"
End Sub
同样初始化 msg = "main"，调用 TestSub2 后在其中将其设为 "ref"，返回后再次输出 msg。此时弹窗显示 "ref"，表明原始变量已被成功修改。
忽略传递关键字的默认行为
若在参数声明中省略 ByVal 或 ByRef，VBA 将自动采用 ByRef 作为默认传递方式。也就是说，下面两段声明完全等价：
' 显式声明 ByRef Sub TestSub1(ByRef msg As String) End Sub ' 隐式默认 ByRef（效果相同） Sub TestSub1(msg As String) End Sub
对象类型的 ByVal 与 ByRef 传递
前文所述规则适用于数值、字符串、布尔等基础类型。但在处理对象（如 Range、Worksheet、Collection 等）时，情况略有不同——无论使用 ByVal 还是 ByRef，传递的始终是对象的引用（即指针），而非对象本身。这意味着即使写成 ByVal obj As Range，你依然可以修改该对象的属性（如 .Value、.Interior.Color），但无法让 obj 指向另一个新对象（除非额外使用 Set 语句）。这部分细节将在对象专题中深入探讨。
数组参数的传递限制
VBA 不支持以 ByVal 方式传递数组（包括一维和多维数组）。一旦尝试这样做，编译器将报错。所有数组参数均强制以 ByRef 形式传递。有关数组参数的具体写法与注意事项，将在数组章节中系统讲解。
总结要点
-
ByVal和ByRef决定了参数在调用过程中的“连接关系”：前者切断关联，后者保持联动。 - 对基础类型而言，
ByVal更安全，可避免意外修改上游变量；而ByRef提供了更高效的交互能力，但也增加了逻辑风险。 - 实践中建议优先选用
ByVal，除非确实需要在子过程中反向更新原始变量。 - 对象和数组的传递机制具有特殊性，不能简单套用基础类型的规则，相关内容将在后续对应章节中逐一剖析。
