使用html标签查找和替换项目符号

Question

我想使用VBA使用html标签替换excel电子表格中单元格内的许多项目符号 我已经知道如何轻松地使用：

Dim sht As Worksheet
Dim fnd As Variant
Dim rplc As Variant

fnd = "Chr(183)"
rplc = "<"/li"><"li">"

For Each sht In ActiveWorkbook.Worksheets
    sht.Cells.Replace what:=fnd, Replacement:=rplc, _
    LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, _
    SearchFormat:=False, ReplaceFormat:=False
Next sht

但是我需要满足的其他要求很少： 小区内的第一个项目符号点需要＆lt;“ul”＆gt;＆lt;“li”＆gt; ，第二个项目符号点和任何后续项目符号点（直到最后一个项目符号点）需要有＆lt;“/ li”＆gt;＆lt;“li”＆gt;最后一个要点必须有＆lt;“/ ul”＆gt;在这个项目符号内的文本之后。

我需要使用哪种类型的功能来满足要求？

P.S请忽略标签中的“”