2016-08-11 51 views
-3

在Word文檔中,我(「{」前有空格)有一個片段:改變背光

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

「開始」和「結束」和「內容」是變量之間的數字。我如何才能將SOLD_TEXT上的背光設置爲黃色?

但有時候,在「SOME_TEXT」是HTML標籤:

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

StackOverflow不是'爲我編寫的代碼'網站。嘗試自己並提出有關代碼中特定問題的問題。 –

回答

0

我發現和修改這個代碼,但我不知道,如何增加「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