2 raske måter å endre fargen på flere understrekinger i Word-dokumentet

I denne artikkelen vil vi fokusere på å forklare 2 raske måter å endre fargen på flere understrekinger i Word-dokumentet.

Som standard er understrekingsfargen i Word satt til "Automatisk". Men det kan være monotont noen ganger. Så for både å diversifisere fargesettet i dokumentet ditt, og for å skille ut det viktige innholdet, er det et godt valg å endre fargen på understrekingen.

Det er enkelt å endre understrekingsfargen før du lager den. Derfor vil vi i det følgende innholdet legge vekt på å endre fargen på eksisterende understreker.

Metode 1: Bruk funksjonen "Avansert søk".

Først og fremst må du finne alle understrekningsforekomstene i gjeldende dokument. For dette behovet kan du se vår forrige artikkel: 2 raske måter å søke etter understrekede tekster i Word-dokumentet ditt

Etter å ha funnet og ha alle understrekinger i utvalget, tar du trinnene nedenfor:

1. Du klikker bare på opp-ned trekantknappen bak understrekingsikonet under "Hjem"-fanen.
2. Velg deretter en farge du liker på den utvidede menyen til "Understrek farge".

Her er videodemonstrasjonen vår:

Metode 2: Kjør Word Macro

Word-makro er et så fantastisk verktøy. Vi kan ikke bare bruke den til å søke etter alle understrekinger, men også endre fargen på dem. Og begge prosedyrene kan fullføres i bare én makro.

1. Til å begynne med, aktiver "Utvikler"-fanen og klikk på den.
2. Klikk deretter på "Visual Basic" i "Code"-gruppen.
3. Klikk deretter på "Normal".
4. Klikk deretter på "Sett inn"-fanen.
5. Og velg "Modul" på menyen.
6. Dobbeltklikk på den nye modulen for å åpne redigeringsområdet.
7. Lim inn kodene nedenfor der:

Sub ChangeUnderlineColor()
  Dim objDoc As Document
  Dim objRange As Range
 
  Set objDoc = ActiveDocument
  Set objRange = objDoc.Range
 
  objRange.Find.ClearFormatting
  With objRange.Find
    .Font.Underline = wdUnderlineSingle
    .text = ""
    .Replacement.text = ""
    .Replacement.Font.UnderlineColor = wdColorBlue
    .Execute Format:=True, Replace:=wdReplaceAll
  End With
End Sub

8. Sist men ikke minst, klikk på "Kjør" -knappen.

Merknader:

1. For det første betyr kodelinjen ".Font.Underline = wdUnderlineSingle" at denne makroen bare finner de enkle understrekingene. Du kan endre "wdUnderlineSingle" til "wdUnderlineDouble", "wdUnderlineThick" osv. For flere understrekingskonstanter, kan du besøke denne lenken: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa224269(v=office.11)
2. For det andre betyr kodelinjen ".Replacement.Font.UnderlineColor = wdColorBlue" at makroen vil endre understrekingsfargen til blå. Og for flere fargekonstanter kan du besøke: https://docs.microsoft.com/en-us/office/vba/api/Word.WdColor

Hent kompromitterte Word-data

Tap av data i Word er svært mulig i disse dager. For eksempel er den vanligste feilen du vil støte på i Word at skjermen fryser. Du kan selvfølgelig velge å starte programmet på nytt. Noen ganger vil det være en automatisk lagret versjon av dokumentet du jobber med. Vi kan imidlertid ikke utelukke eller ta oss råd til muligheten for å miste dokumentet helt eller delvis. Derfor må vi tenke på måter å gjenopprette dataene på. Og når vi snakker om det, en profesjonell Ordreparasjon verktøyet er nøkkelen til suksess.

Forfatterintroduksjon:

Vera Chen er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologi, inkludert verktøy for reparasjon skadet xls og pdf reparere programvareprodukter. For mer informasjon besøk www.datanumen. Med