VBA excel #VALUE错误

时间:2013-12-04 22:53:11

标签: excel-vba vba excel

我有一个带两个字符串的函数,它应该添加它们。

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

它应该将两个字符串一起返回,但它显示我#VALUE! =公式中使用的值是错误的数据类型。 (一切似乎都是正确的数据类型)

2 个答案:

答案 0 :(得分:0)

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

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

另外,为什么不使用常规公式,如=A1&B1

答案 1 :(得分:0)

如果您引用的单元格中没有任何错误,您的代码应该可以正常工作。也许您选择了多个单元格作为输入?您可以尝试进行以下修改,看看是否有效。它将您的输入视为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