2015-02-11 178 views
0

我有包含html的电子表格。它很丑。我可以删除使用VB的HTML:Excel:用换行符替换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),但我可以使用一些帮助。

+1

嗨保罗。我只是复制并粘贴你的代码,并为我工作得很好。也许你可以设置工作表,以防万一。 – Dubison 2015-02-11 12:07:47

+0

另一种选择是使用'vbNewLine'而不是'Chr(10)'。你可以试试吗? – Dubison 2015-02-11 12:12:26

回答

0

正如我在评论中提到,你的代码工作对我很好但是你有其他选项来创建一个nextline:

(Chr10) 
vbNewLine 
vbLf 
vbCrLf 

所有这些常量可以作为新的生产线。我不知道有什么区别,但他们都适合我:)

你可以尝试这些,看看他们的工作。