Option Explicit
Sub data()
Dim a, b As String
a = "demo"
b = "text"
Call getValue(a, b)
End Sub
Sub getValue(a As String, b As String)
Cells(1, 1).Value = a
Cells(1, 2).Value = b
End Sub
我收到编译时错误:上述代码上的 byref 参数类型不匹配错误
最佳答案
当您定义 Dim a, b As String
这意味着仅限 b As String
而a As Variant
.您需要为您定义的每个变量显式定义类型。
将您的行修改为:Dim a As String, b As String
,它会工作。
关于vba - 获取编译错误 : argument type mismatch error,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/46439799/