Understanding How to Find Characters That Have Been Painted

I have a question about Word's VBA fill properties.

Search for grayed-out areas in the number list VBA and get a selection)
I want to unpaint the painted part and put "<""">" before and after that part

I chose Shading.BackgroundPatternColorIndex as my search option, but when I set it up, it doesn't meet the criteria anymore.

If anyone knows how to do it, I would really appreciate it if you could teach me. Thank you for your cooperation.

Dim Rng As Range
Set Rng = ActiveDocument.Range
    With Selection.Find
    .Font.Shading.BackgroundPatternColorIndex=16
    Do While.Execute
      Selection.Range.Shading.BackgroundPatternColorIndex=0
      Selection.Range.InsertAfterText:=">**"
    　Selection.Range.InsertBefore Text:="**<"
    Loop
    End With
End Sub


vba
ms-word
					
					

	


		
	

	
		2022-09-30 11:22



			

			
			1 Answers


	
		
Shading.BackgroundPatternColorIndex but Highlig when retrieving/setting fluorescent pen colors for normal RangeIt seems to be using htColorIndex.
[Code] You can rewrite the Word Macro article that erases the fluorescent pen of a particular color.

Below is the sample code.

Please note that InsertAfter will be inserted at the beginning of the next line if the entire line is highlighted in the sample code.
SubModifyHighlights()
    ActiveDocument.Range(0,0).Select
    With Selection.Find
        .Highlight=True
        .Forward=True
        .Wrap=wdFindContinue
        Do While.Execute
            If Selection.Range.HighlightColorIndex=16 Then
                Selection.Range.HighlightColorIndex=wdNoHighlight
                Selection.Range.InsertAfterText:=">**" 
                Selection.Range.InsertBefore Text:="**<" 
            End If
            Selection.Collapse Direction: =wdCollapseEnd
        Loop
    End With
End Sub


		
		
			

				

					
				

				
					2022-09-30 11:22
				
			
		
	
			
			If you have any answers or tips



		

	
		Popular Tags
	
	python x 4647
android x 1593
java x 1494
javascript x 1427
c x 927
c++ x 878
ruby-on-rails x 696
php x 692
python3 x 685
html x 656
	


	
		Popular Questions
	
	
	967 In Java servlet, when SHA-256 sends WW-Authenticate header for digest authentication, the client does not return the result.

	541 Who developed the "avformat-59.dll" that comes with FFmpeg?

	560 /usr/bin/google-chrome:symbol lookup error:/usr/bin/google-chrome: undefined symbol:gbm_bo_get_modifier

	536 rails db:create error: Could not find mysql2-0.5.4 in any of the sources

	535 Unable to install versioned in Google Colab