如何检查VBA变量是否原本被声明为Variant类型？

很遗憾，在VBA运行时没有内置的方法可以直接检查一个变量是否原本被声明为Variant类型。

你提供的代码示例正好说明了这个核心问题：

Public Sub mainMethod()
    Dim a As Variant
    Dim b As String
    a = "a"
    b = "b"
    Debug.Print "a: " & VBA.TypeName(a) & " | " & VBA.VarType(a)
    Debug.Print "b: " & VBA.TypeName(b) & " | " & VBA.VarType(b)
End Sub

运行后输出：

a: String | 8
b: String | 8

这是因为Variant本质是一种“自适应”的包装类型——当你给它赋值后，VBA运行时只会跟踪它当前存储的数据类型，完全不会保留它最初的声明信息。VarType和TypeName这两个函数都是基于变量当前持有的值来返回结果，所以不管变量原本是Variant还是其他具体类型，只要当前值的类型一致，它们的返回结果就会完全相同。

你提到的通过VBE函数解析代码体的方式，确实能获取变量的原始声明类型，但正如你所说，这种方式不符合需求。而在运行时层面，VBA没有提供任何原生手段来获取变量的原始声明类型。

如果你的业务逻辑必须区分这类情况，只能自己手动设计额外的跟踪机制——比如用一个平行的变量数组、字典，或者自定义类型来记录每个变量的原始声明类型，但这需要在编写代码时就提前规划，属于临时替代方案而非原生解决方案。

内容的提问来源于stack exchange，提问作者mielk