Š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ą.
1 būdas: naudokite „Išplėstinį paiešką“, kad rastumėte visus tekstus skliausteliuose
- Norėdami pradėti, juostelėje spustelėkite skirtuką „Pagrindinis“.
- Toliau grupėje „Redagavimas“ spustelėkite išskleidžiamąjį mygtuką šalia komandos „Rasti“.
- Išskleidžiamajame meniu pasirinkite „Išplėstinė paieška“, kad atidarytumėte dialogo langą „Rasti ir pakeisti“.
- 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
<> |
\<*\> |
- Spustelėkite skirtuką „Daugiau“.
- Tada pažymėkite laukelį „Naudoti pakaitos simbolius“.
- Spustelėkite „Rasti“ ir pasirinkite „Pagrindinis dokumentas“.
- Dabar pamatysite visus tekstus, esančius konkretaus tipo skliausteliuose, kurie yra pasirinkti.
- Galite tęsti darbą laukelyje „Rasti ir pakeisti“, spustelėję skirtuką „Formatas“ ir pasirinkę „Šriftas“.
- Lauke „Rasti šriftą“ pasirinkite šrifto spalvą ir spustelėkite „Gerai“. Tada šrifto spalva skliausteliuose turi būti pakeista.
- 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“.
- Pirmiausia paspauskite „Ctrl + H“, kad paleistumėte laukelį „Rasti ir pakeisti“.
- Teksto laukelyje „Rasti ką“ įveskite 1 metodo lentelėje pateiktą eilutę.
- Ir teksto laukelyje „Pakeisti į“ įveskite „^&“.
- Tada spustelėkite „Daugiau“ ir pažymėkite laukelį „Naudoti pakaitos simbolius“.
- Tada spustelėkite mygtuką „Formatas“ ir pasirinkite „Šriftas“.
- Ten nustatykite šrifto spalvą ir spustelėkite „Gerai“.
- Galiausiai lauke „Rasti ir pakeisti“ spustelėkite „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ą.
- Paspauskite „Alt + F11“, kad iškviestumėte VBA redaktorių.
- Tada spustelėkite „Įprastas projektas“.
- Tada spustelėkite „Įterpti“ ir pasirinkite „Modulis“.
- 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
- Norėdami vykdyti kodus, paspauskite „F5“.
- 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.
Štai galimas rezultatas:
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





