我有包含html的电子表格。这太丑了。我可以使用VB删除html:
Replace What:="<*>", Replacement:="",
这更整洁,但我失去了使文本更具可读性的换行符。我想要做的是在插入之前插入换行符。 <li>
。 Chr(10)
是插入换行符的VB,但是这不会插入换行符:
Sub listItem()
Cells.Replace What:="<li>", Replacement:=Chr(10) & " - ", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
End Sub
它用连字符替换<li>
,但没有换行符。它不会抛出错误。我假设我错误地使用了Chr(10),但我可以使用一些帮助。
答案 0 :(得分:0)
正如我在评论中提到的,您的代码对我来说很好,但是您还有其他选项来创建下一行:
(Chr10)
vbNewLine
vbLf
vbCrLf
所有这些常量都可以用作新行。我不知道有什么不同,但所有这些都适合我:)
您可以尝试这些并查看它们是否有效。