Изменить подсветку

В документе Word у меня есть фрагменты (с пробелами перед "{"):

    {""start":   15.4, "end":    31.5, "content": ”SOME_TEXT”.",},

Числа между "начало" и "конец" и "содержание" являются переменными. Как установить желтую подсветку только на SOME_TEXT?

Но иногда в "SOME_TEXT" есть тег html:

<br>, </br>, <ul>, </ul>, <li>, </li>, <b>,</b>, <i>, </i>, <u>, </u>

1 ответ

Я нашел и изменил этот код, но я не знаю, как добавить переменную 'TargetList' для чисел и SOME_TEXT.

Sub test_highlight()

Dim range As range Dim i As Long Dim TargetList

TargetList = Array("<ul>", "</ul>", "<li>", "</li>", "<br>", "</br>", "<b>", "</b>", "        {""start"":   ""end"": ,""content"":""SOME_TEXT."",}, ")

For i = 0 To UBound(TargetList)

Set range = ActiveDocument.range

With range.Find .Text = TargetList(i) .Format = True .MatchCase = True .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False

Do While .Execute(Forward:=True) = True range.HighlightColorIndex = wdWhite

Loop

End With Next

End Sub
Другие вопросы по тегам