2 korisna metoda za zamjenu boje isticanja u vašem Word dokumentu

U ovom članku sa zadovoljstvom vam možemo pokazati 2 korisne metode za zamjenu boje isticanja u vašem Word dokumentu.

Ponekad možete istaknuti različite sadržaje različitim bojama. Ali za razliku od boje fonta, ne možete koristiti "Pronađi i zamijeni" da biste pronašli tekstove u određenoj boji isticanja i zamijenili je drugom.

Stoga će nam trebati neka rješenja. Slijede 2 načina dostupna za različite slučajeve.

Metoda 1: Zamijenite sve istaknute boje istom

Boja isticanja povezana sa dijaloškim okvirom „Pronađi i zamijeni“ je trenutna odabrana u ikoni Istakni.

1. Prije svega, na kartici “Home” iu grupi “Font” kliknite na dugme padajućeg menija na komandi “Text Highlight Color”. Izaberite boju na koju želite da promenite sve svetle boje. Na primjer, ovdje biramo “Bright Green”.
2. Zatim pritisnite “Ctrl+ H” da pokrenete dijaloški okvir “Pronađi i zamijeni”.
3. Stavite kursor u okvir za tekst „Pronađi šta“.
4. Kliknite na "Više" da biste prikazali više opcija i kliknite na "Format".
5. I odaberite “Istakni”.
6. Zatim postavite kursor u okvir „Zamijeni sa“ i ponovite korake 4 i 5.
7. Na kraju, kliknite na "Zamijeni sve".

Sada ste zamijenili sve istaknute boje svijetlo zelenom.

Metoda 2: Zamijenite određenu boju isticanja drugom

Da biste izvršili ovaj zadatak, potreban je makro.

1. Prvo i osnovnoost, pritisnite “Alt+ F11” da otvorite VBA editor.
2. Zatim kliknite na “Normalni” projekat na lijevoj koloni.
3. Zatim kliknite na karticu "Insert" na traci menija.
4. I odaberite “Module” na tom padajućem izborniku.
5. Otvorite novi modul dvostrukim klikom.
6. Sada zalijepite sljedeće kodove:

Sub ReplaceOneHighlightColorToAnother()
  Dim strFindColor As String
  Dim strReplaceColor As String
  Dim objDoc As Document
  Dim objRange As Range
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
 
  strFindColor = InputBox("Specify a color (enter the value):", "Specify Highlight Color")
  strReplaceColor = InputBox("Specify a new color (enter the value):", "New Highlight Color")
 
  With Selection
    .HomeKey Unit:=wdStory
    With Selection.Find
      .Highlight = True
 
      Do While .Execute
        If Selection.Range.HighlightColorIndex = strFindColor Then
          Set objRange = Selection.Range
          objRange.HighlightColorIndex = strReplaceColor
          Selection.Collapse wdCollapseEnd
        End If
      Loop
    End With
  End With
 
  Application.ScreenUpdating = True
End Sub

7. Zatim kliknite na dugme “Run” ili pritisnite “F5”.
8. Zatim u okvir “Specify Highlight Color” unesite vrijednost koja predstavlja boju koju želite zamijeniti. Da biste dobili odgovarajuću vrijednost određene boje, možete posjetiti ovaj link: https://docs.microsoft.com/en-us/office/vba/api/Word.WdColorIndex
9. Na primjer, ako želimo zamijeniti žutu boju svijetlo zelenom, unosimo "7" u okvir "Specify Highlight Color" i kliknemo "OK".
10. Zatim u polje „Nova boja za isticanje“ unesite vrednost nove boje i kliknite na „U redu“.

Evo mogućeg ishoda zamjene žute svijetlo zelenom.

Izbjegnite katastrofu gubitka podataka

Riječ je tako veliki pomagač u našem svakodnevnom radu. Stoga, nije teško zamisliti katastrofu koju može donijeti kada se sruši. Da biste izbjegli gubitak kritičnih podataka, možete doći do a Word fix alat unapred. Sa takvim uslužnim programom pri ruci, ne biste trebali brinuti o gubitku podataka.

Uvod za autora:

Vera Chen je stručnjak za oporavak podataka DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući corrupt xlsx i pdf popravak softverskih proizvoda. Za više informacija posjetite www.datanumen.com