vba - 如何从 Excel VBA 用户定义函数返回带换行符的字符串

Question

我试图从 VBA 函数 =Showtext(A1,A2) 返回一个字符串，例如

Function Showtext(s1 as string, s2 as string) 

Showtext= s1 & chr(10) & s2

end function

但是，当调用 =Showtext("Hello","World") 时，它在单元格中显示为 Hello World 而不是

Hello
World

我尝试过其他字符，例如chr(13)、vbnewline、vbcrlf，但没有成功

有人可以帮忙吗？

谢谢

Answer 1

尝试Showtext = s1 & vbNewLine & s2。请注意大写“N”和大写“L”。

您的函数定义还应该在参数后面添加As String。