Paano Mag-alis ng isang Tiyak na Kulay ng Highlight mula sa Iyong Dokumento ng Word

Sa post natin ngayon, ikinalulugod naming ibahagi sa inyo ang epektibong paraan para matanggal ang isang partikular na kulay ng highlight mula sa inyong Word document.

Sa isa sa aming nakaraang mga artikulo, napag-usapan na namin ang tungkol sa mga paraan upang alisin ang mga highlight ng kulay. Para sa detalyadong impormasyon, maaari kang mag-refer sa link na ito: 5 Mga Paraan upang Alisin ang Pag-highlight o Pag-shading sa Iyong Dokumento ng Word

Ngayon, hayaan ang tumingin sa isa pang kaso na ang isang dokumento ay maaaring maglaman ng maraming mga kulay ng pag-highlight upang makilala ang iba't ibang uri ng mga nilalaman. Sa ganitong kaso, nabigo ang mga karaniwang paraan upang makilala ang isang tukoy na kulay ng pag-highlight. Bilang isang bagay ng katotohanan, ang tanging mabilis at mabisang paraan ay upang magpatakbo ng isang Word macro.

Ngayon tingnan ang umuusok na diskarte.

Alisin ang isang Tiyak na Kulay ng Highlight sa pamamagitan ng VBA

1. Una sa lahat, i-click ang tab na "Developer" sa Ribbon.
2. Pagkatapos ay i-click ang "Visual Basic" upang ma-trigger ang VBA editor sa Word. At isinasaalang-alang na maaaring wala ka pang tab na "Developer", maaari mong pindutin ang "Alt + F11" sa halip.
3. Susunod na pag-click sa "Normal" na proyekto sa kaliwang haligi sa editor.
4. Pagkatapos i-click ang tab na "Ipasok" sa menu bar.
5. Sa drop-down na menu, piliin ang "Modyul".
6. Ngayon mag-double click sa bagong module upang buksan ang coding area.
7. I-paste ang sumusunod na macro sa module:

Sub RemoveSpecificHighlightColor()
  Dim objDoc As Document
  Dim objRange As Range
  Dim strHighlightColor As String
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
  strHighlightColor = InputBox("Choose a Highlight colour to remove (enter the value):" & vbNewLine & _
                      vbTab & "Auto" & vbTab & vbTab & "0" & vbNewLine & _
                      vbTab & "Black" & vbTab & vbTab & "1" & vbNewLine & _
                      vbTab & "Blue" & vbTab & vbTab & "2" & vbNewLine & _
                      vbTab & "BrightGreen" & vbTab & "4" & vbNewLine & _
                      vbTab & "DarkBlue" & vbTab & vbTab & "9" & vbNewLine & _
                      vbTab & "DarkRed" & vbTab & vbTab & "13" & vbNewLine & _
                      vbTab & "DarkYellow" & vbTab & "14" & vbNewLine & _
                      vbTab & "Gray25" & vbTab & vbTab & "16" & vbNewLine & _
                      vbTab & "Gray50" & vbTab & vbTab & "15" & vbNewLine & _
                      vbTab & "Green" & vbTab & vbTab & "11" & vbNewLine & _
                      vbTab & "Pink" & vbTab & vbTab & "5" & vbNewLine & _
                      vbTab & "Red" & vbTab & vbTab & "6" & vbNewLine & _
                      vbTab & "Teal" & vbTab & vbTab & "10" & vbNewLine & _
                      vbTab & "Turquoise" & vbTab & "3" & vbNewLine & _
                      vbTab & "Violet" & vbTab & vbTab & "12" & vbNewLine & _
                      vbTab & "White" & vbTab & vbTab & "8" & vbNewLine & _
                      vbTab & "Yellow" & vbTab & vbTab & "7", "Highlight Color")
  With Selection
    .HomeKey Unit:=wdStory
    With Selection.Find
      .Highlight = True
 
      Do While .Execute
        If Selection.Range.HighlightColorIndex = strHighlightColor Then
          Set objRange = Selection.Range
          objRange.HighlightColorIndex = wdNoHighlight
          Selection.Collapse wdCollapseEnd
        End If
      Loop
    End With
  End With
 
  MsgBox ("The chosen highlight color has been removed in the document.")
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

8. Pagkatapos ay i-click ang pindutan na "Run" o pindutin ang "F5" upang magpatupad ng mga code.
9. Susunod, mayroong kahon na "Kulay ng Highlight". Mayroong isang halaga para sa bawat kulay. Ipasok lamang ang halagang nauugnay sa kulay ng highlight na aalisin.
10. Huling ngunit hindi pa huli, i-click ang "OK" upang magpatuloy.
11. Kapag tapos na ito, makakatanggap ka ng tulad ng isang kahon ng mensahe:

Narito ang posibleng kahihinatnan:

Panatilihing ligtas ang Iyong Data

Madaling masira ang integridad ng datos. Panahon na para gumawa ng mga hakbang pang-iwas bago mahuli ang lahat. Halimbawa, ang pinakarekomendadong paraan ay ang regular na pag-backup ng mga file. Siguraduhing laging mayroon kang pinakabagong bersyon na magagamit kapag may hindi inaasahang mangyari. Kung hindi, kakailanganin mong dumaan sa proseso. Pagbawi ng salita upang maibalik ang data.

Panimula ng May-akda:

Si Vera Chen ay isang dalubhasa sa pagbawi ng data sa DataNumen, Inc., na pinuno ng mundo sa mga teknolohiya sa pagbawi ng data, kasama ang ayusin ang xlsx at pdf pagkumpuni ng mga produktong software. Para sa karagdagang impormasyon pagbisita www.datanumen. Sa