2 Užitočné metódy nahradenia farby zvýraznenia v dokumente Word

V tomto článku vám s potešením ukážeme 2 užitočné spôsoby, ako nahradiť farbu zvýraznenia v dokumente Word.

Niekedy môžete zvýrazniť iný obsah rôznymi farbami. Ale na rozdiel od farby písma nemôžete použiť funkciu „Nájsť a nahradiť“ na nájdenie textov v konkrétnej farbe zvýraznenia a ich nahradenie inou farbou.

Preto budeme potrebovať nejaké alternatívne riešenia. Nasledujú 2 spôsoby dostupné pre rôzne prípady.

Metóda 1: Nahraďte všetky farby zvýraznenia rovnakou farbou

Farba zvýraznenia priradená k dialógovému oknu „Nájsť a nahradiť“ je aktuálna vybratá v ikone Zvýraznenie.

1. Najskôr na karte „Domov“ a v skupine „Písmo“ kliknite na rozbaľovacie tlačidlo na príkaze „Farba zvýraznenia textu“. Vyberte farbu, na ktorú chcete zmeniť všetky farby zvýraznenia. Tu napríklad vyberieme „Jasne zelená“.
2. Potom stlačte „Ctrl + H“, aby sa spustilo dialógové okno „Nájsť a nahradiť“.
3. Umiestnite kurzor do textového poľa „Nájsť čo“.
4. Kliknutím na „Viac“ zobrazíte ďalšie možnosti a kliknutím na „Formátovať“.
5. A zvoľte „Zvýrazniť“.
6. Ďalej umiestnite kurzor do poľa „Nahradiť“ a zopakujte kroky 4 a 5.
7. Nakoniec kliknite na „Nahradiť všetko“.

Teraz ste všetky zvýraznené farby nahradili žiarivo zelenou.

Metóda 2: Vymeňte konkrétnu farbu zvýraznenia za inú

Na splnenie tejto úlohy je potrebné makro.

1. V prvom radeost, stlačte klávesy „Alt + F11“ a otvorte editor VBA.
2. Ďalej kliknite na „Normálny“ projekt v ľavom stĺpci.
3. Potom kliknite na karte „Vložiť“ na paneli s ponukami.
4. V rozbaľovacej ponuke vyberte možnosť „Modul“.
5. Nový modul otvoríte dvojitým kliknutím.
6. Teraz vložte nasledujúce kódy:

Sub ReplaceOneHighlightColorToAnother () Dim strFindColor ako reťazec Dim strReplaceColor ako reťazec Dim objDoc ako dokument Dim objRange ako rozsah Application.ScreenUpdating = False Set objDoc = ActiveDocument strFindColor = InputBox ("Zadajte farbu (zadajte hodnotu):", "Zadajte farbu ) strReplaceColor = InputBox ("Zadajte novú farbu (zadajte hodnotu):", "Nová farba zvýraznenia") s výberom. Jednotka HomeKey: = wdStory s výberom.Find .Highlight = True Do While .Execute If Selection.Range.HighlightColorIndex = strFindColor Potom nastavte objRange = Selection.Range objRange.HighlightColorIndex = strReplaceColor Selection.Collapse wdCollapseEnd Koniec Ak Smyčka Koniec Koniec S Aplikáciou.ScreenUpdating = Skutočný Koniec Sub

7. Ďalej kliknite na tlačidlo „Spustiť“ alebo stlačte „F5“.
8. Potom do poľa „Zadať farbu zvýraznenia“ zadajte hodnotu predstavujúcu farbu, ktorá sa má nahradiť. Ak chcete získať zodpovedajúcu hodnotu konkrétnej farby, môžete navštíviť tento odkaz: https://docs.microsoft.com/en-us/office/vba/api/Word.WdColorIndex
9. Napríklad, ak chceme nahradiť žltú farbu jasnou zelenou, zadáme „7“ do poľa „Zadať farbu zvýraznenia“ a klikneme na „OK“.
10. Potom do poľa „Nová farba zvýraznenia“ zadajte hodnotu novej farby a kliknite na tlačidlo „OK“.

Tu je možný výsledok nahradenia žltej jasne zelenou farbou.

Vyvarujte sa katastrofe straty dát

Slovo je takým skvelým pomocníkom pri našej každodennej práci. Preto nie je ťažké predstaviť si katastrofu, ktorú môže priniesť, keď sa zrúti. Aby ste sa vyhli strate dôležitých údajov, môžete sa zmocniť a Oprava slova nástroj vopred. Vďaka takémuto nástroju po ruke by ste sa nemali obávať straty dát.

Úvod autora:

Vera Chen je expertka na obnovu dát v DataNumen, Inc., ktorá je svetovým lídrom v oblasti technológií obnovy dát, vrátane skazený xlsx a pdf oprava softvérových produktov. Pre viac informácií navštívte www.datanumen. S