3 greiti būdai, kaip pakeisti skliausteliuose esančių tekstų spalvą Word dokumente

Bendrinti dabar:

Šiandienos įraše daugiausia dėmesio skirsime 3 būdams, kaip paketiniu būdu pakeisti skliausteliuose esančio teksto spalvą „Word“ dokumente.

Neretai dokumente naudojami įvairių tipų skliaustai. Skliausteliuose įrašytiems tekstams jie yra vienodai svarbūs ir ne. Net kartais pastebite, kad turite juos išsiskirti. Atsižvelgdami į šį poreikį, mes surūšiavome 3 greitus būdus, kuriais galite keisti skliausteliuose esančių tekstų spalvą.Pakeiskite teksto spalvą skliausteliuose savo Word dokumente

1 būdas: naudokite „Išplėstinį paiešką“, kad rastumėte visus tekstus skliausteliuose

  1. Norėdami pradėti, juostelėje spustelėkite skirtuką „Pagrindinis“.
  2. Toliau grupėje „Redagavimas“ spustelėkite išskleidžiamąjį mygtuką šalia komandos „Rasti“.
  3. Išskleidžiamajame meniu pasirinkite „Išplėstinė paieška“, kad atidarytumėte dialogo langą „Rasti ir pakeisti“.Spustelėkite "Pagrindinis" -> Spustelėkite išskleidžiamąjį mygtuką šalia "Rasti" -> Pasirinkite "Išplėstinis paieška"
  4. Tada perkelkite žymeklį į teksto laukelį „Rasti ką“ ir įveskite vieną iš šios lentelės eilučių.
Kilpos Stygos, skirtos skliausteliams ir visiems pridedamiems tekstams rasti
Laužtiniai skliaustai

[]

\[*\]
Skliaustai

()

\(*\)
Petnešos (garbanotieji skliaustai)

{}

\{*\}
Kampiniai laikikliai

<>

\<*\>

 

  1. Spustelėkite skirtuką „Daugiau“.
  2. Tada pažymėkite laukelį „Naudoti pakaitos simbolius“.
  3. Spustelėkite „Rasti“ ir pasirinkite „Pagrindinis dokumentas“.Įveskite eilutę į "Rasti ką" teksto laukelį -> spustelėkite "Daugiau" -> Pažymėkite "Naudoti pakaitos simbolius" -> spustelėkite "Rasti" -> Pasirinkite "Pagrindinis dokumentas"
  4. Dabar pamatysite visus tekstus, esančius konkretaus tipo skliausteliuose, kurie yra pasirinkti.
  5. Galite tęsti darbą laukelyje „Rasti ir pakeisti“, spustelėję skirtuką „Formatas“ ir pasirinkę „Šriftas“.
  6. Lauke „Rasti šriftą“ pasirinkite šrifto spalvą ir spustelėkite „Gerai“. Tada šrifto spalva skliausteliuose turi būti pakeista.
  7. Arba galite paspausti „Ctrl + D“, kad atidarytumėte laukelį „Šriftas“ ir nustatytumėte šrifto spalvą.

2 būdas: norėdami pakeisti šrifto spalvą naudokite funkciją „Rasti ir pakeisti“.

  1. Pirmiausia paspauskite „Ctrl + H“, kad paleistumėte laukelį „Rasti ir pakeisti“.
  2. Teksto laukelyje „Rasti ką“ įveskite 1 metodo lentelėje pateiktą eilutę.
  3. Ir teksto laukelyje „Pakeisti į“ įveskite „^&“.
  4. Tada spustelėkite „Daugiau“ ir pažymėkite laukelį „Naudoti pakaitos simbolius“.
  5. Tada spustelėkite mygtuką „Formatas“ ir pasirinkite „Šriftas“.
  6. Ten nustatykite šrifto spalvą ir spustelėkite „Gerai“.
  7. Galiausiai lauke „Rasti ir pakeisti“ spustelėkite „Pakeisti viską“.Įveskite eilutes į „Rasti ką“ ir „Pakeisti į“ teksto laukelius-> Pažymėkite laukelį „Naudoti pakaitos simbolius“-> Spustelėkite „Formatas“-> „Šriftas“-> „Pakeisti viską“

3 būdas: paleiskite VBA kodus, kad pakeistumėte tekstų spalvą

Vykdydami šią makrokomandą, visi esantys tekstai visų tipų skliaustuose bus pakeisti į tam tikrą spalvą.

  1. Paspauskite „Alt + F11“, kad iškviestumėte VBA redaktorių.
  2. Tada spustelėkite „Įprastas projektas“.
  3. Tada spustelėkite „Įterpti“ ir pasirinkite „Modulis“.Spustelėkite "Įprastas" -> Spustelėkite "Įterpti" -> spustelėkite "Modulis"
  4. Dukart spustelėkite, kad atidarytumėte naujai sukurtą modulį ir įklijuokite ten kodus:
Sub ChangeTheFontColorInBrackets()
  Dim objRange As Range
  Dim strFontColor As String
  Set objRange = ActiveDocument.Content 
  strFontColor = InputBox("Enter the font color you want to change", "Font Color", "For example:2")
  ' Find the words in brackets and change the font color.

  With objRange.Find
    .Text = "\[*\]"
    .MatchWildcards = True
    .Replacement.Font.ColorIndex = strFontColor
    .Execute Replace:=wdReplaceAll
    .Text = "\(*\)"
    .Replacement.Font.ColorIndex = strFontColor
    .Execute Replace:=wdReplaceAll
    .Text = "\{*\}"
    .Replacement.Font.ColorIndex = strFontColor
    .Execute Replace:=wdReplaceAll
    .Text = "\<*\>"
    .Replacement.Font.ColorIndex = strFontColor
    .Execute Replace:=wdReplaceAll   
  End With
End Sub
  1. Norėdami vykdyti kodus, paspauskite „F5“.
  2. Bus paraginti įvesties laukelis. Šiame tinklalapyje galite sužinoti konkrečios spalvos vertę:

https://docs.microsoft.com/en-us/office/vba/api/Word.WdColorIndex

Tiesiog įveskite reikšmę ir spustelėkite „Gerai“, kad tęstumėte.Įveskite šrifto spalvos reikšmę -> spustelėkite „Gerai“

Štai galimas rezultatas:VBA kodų paleidimo poveikis

Tinkamai kreipkites į dokumentų korupciją

Neturėtumėte pasikliauti sėkme, kad duomenys būtų saugūs. Vietoj to, turite visapusiškai pasiruošti, kol neįvyks bet kokia duomenų katastrofa. Vienas iš svarbiausių dalykų – įsigyti specializuotą įrankį, kuris padėtų išspręsti problemą. sugadintas žodis iš anksto.

Autoriaus įvadas:

Vera Chen yra duomenų atkūrimo ekspertė DataNumen, Inc., kuri yra pasaulyje duomenų atkūrimo technologijų lyderė, įskaitant Excel remontas bei pdf programinės įrangos gaminių taisymas. Norėdami gauti daugiau informacijos, apsilankykite WWW.datanumen.com

Bendrinti dabar:

Komentarai yra uždaryti.