VBA Word无法插入换行

Question

我有一个带数字的字符串，看起来像这样：

“ 12345678-123”

我想在破折号“-”之前添加换行符（通过按[SHIFT] + [ENTER]获得的内容。）

它一直在添加回车符。这是我的代码：

sSomeString = Replace(sSomeString, "-", vbLf & Chr(30)) 'Chr(11) does not work ether - Chr(30) is the char for the dash, that does not break

ActiveDocument.Tables(iTableIndex).Cell(.Rows.Count, 4).Range.Text = sSomeString

我用谷歌搜索，到目前为止，到处都说要使用以太vbLf或Chr（11）。有什么想法吗？

//问题已解决：

我的代码未正确运行，原因是我没有使用Char（30），因此Word使用字符“-”创建了换行符

Answer 1

Word使用垂直制表符（字符代码11）来换行。因此，您需要这样的东西：

sSomeString = Replace(sSomeString, "-", Chr(11) & Chr(30))

我不知道Microsoft是否可以立即使用。但是，您始终可以在Word（Shift + Enter）中插入换行符，然后使用VBA检查字符代码。