VBA Excel #VALUE错误

Question

我有一个需要两个字符串的函数，它应该将它们相加。

Function teiseLopp(tekst1 As String, tekst2 As String) As String
    Dim stringidKoos As String
    stringidKoos = tekst1 & "" & tekst2
    teiseLopp = stringidKoos
End Function

它应该一起返回两个字符串，但显示#VALUE！ =公式中使用的值是错误的数据类型。 （一切似乎都是正确的数据类型）

Answer 1

无需在中间添加空字符串，并且您需要定义数据类型。 尝试

Function teiseLopp(tekst1 As String, tekst2 As String) As String
    Dim stringidKoos As String
    stringidKoos = tekst1  & tekst2
    teiseLopp = stringidKoos
End Function

另外，为什么不使用正则公式，如=A1&B1

Answer 2

如果您引用的单元格中没有任何错误，那么您的代码应该可以正常工作。 也许您选择了多个单元格作为输入？ 您可以尝试以下修改，看看是否可行。 它将您的输入作为Range处理，并且仅对每个输入范围中左上角单元格中的值进行运算。

Function teiseLopp(tekst1 As Range, tekst2 As Range) As String
    Dim stringidKoos As String
    stringidKoos = tekst1.Range("A1").Value & "" & tekst2.Range("A1").Value
    teiseLopp = stringidKoos
End Function