主题：关于单元格换行问题

在程序表里，单元格数据为

参考代码

 

Dim str As String = ClipBoard.GetText
msgbox(str)
str = """" & str & """"
msgbox(str)
ClipBoard.SetText(str)

请问代码原理是什么

 在字符前后加入双引号，如 "单元格内容"

为什么加双引号他就可以单元格内换行？

 Excel里面的要求。

不行，有bug

Dim str As String = ClipBoard.GetText
msgbox(str)
str = str.replace(vbcrlf, chr(11))
msgbox(str)
Dim nstr As String = ""
For Each s As String In str.Split(chr(13))
    nstr &= """" & s & """" & vbcrlf
Next
nstr = nstr.Replace(chr(11), vbcrlf)
msgbox(nstr)
ClipBoard.SetText(nstr)

 

还不行，你两种情况混合起来测一下

测试没问题啊。