2016-08-11 3 views
-3

나는 ("{"전에 공백)이 조각을 가지고있다 : '시작'과 '끝'과 '내용'변수는 사이변화 백라이트

{""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> 
+0

StackOverflow는 'this this code for this site'가 아닙니다. 직접 해보고 코드의 특정 문제에 대해 질문하십시오. –

답변

0

내가 발견하고이 코드를 수정,하지만 난 숫자와 SOME_TEXT에 대한 'TARGETLIST'변수에 추가하는 방법을 모르겠어요.

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