2 օգտակար մեթոդ ձեր Word փաստաթղթում Highlight գույնը փոխարինելու համար

Այս հոդվածում մենք ուրախ ենք ձեզ ցույց տալ 2 օգտակար մեթոդ `ձեր Word փաստաթղթում ընդգծված գույնը փոխարինելու համար:

Երբեմն կարող եք տարբեր գույներով տարբեր բովանդակություն ընդգծել: Բայց ի տարբերություն տառատեսակի գույնի, դուք չեք կարող օգտագործել «Գտիր և փոխարինիր» -ը ՝ հատուկ ընդգծված գույնի տեքստեր գտնելու և այն փոխարինելու մեկ այլով:

Հետևաբար, մեզ որոշ լուծումներ են պետք: Ստորև բերված են տարբեր դեպքերի համար մատչելի երկու եղանակներ:

Մեթոդ 1. Բոլոր Highlight գույները փոխարինեք նույնով

«Գտիր և փոխարինիր» երկխոսության տուփի հետ կապված կարևորագույն գույնը Գունանշման պատկերակում ընտրված ընթացիկն է:

1. Նախևառաջ, «Տուն» ներդիրի ներքո և «Տառատեսակ» խմբում կտտացրեք «Տեքստի լուսավորության գույնը» հրամանի բացվող կոճակին: Ընտրեք մի գույն, որին ցանկանում եք, փոխել բոլոր հիմնական գույները: Օրինակ, մենք այստեղ ընտրում ենք «Վառ կանաչ»:
2. Դրանից հետո սեղմեք «Ctrl + H» ՝ «Գտիր և փոխարինիր» երկխոսության պատուհանը գործարկելու համար:
3. Կուրսորը դրեք «Գտեք ինչ» տեքստի տուփի մեջ:
4. Կտտացրեք «Ավելին» ՝ ավելի շատ ընտրանքներ ներկայացնելու համար և կտտացրեք «Ձևաչափ»:
5. Եվ ընտրեք «Highlight»:
6. Հաջորդը դրեք կուրսորը «Փոխարինիր» վանդակում և կրկնում 4-րդ և 5-րդ քայլերը:
7. Ի վերջո, կտտացրեք «Փոխարինել բոլորը»:

Այժմ դուք բոլոր վառ գույները փոխարինել եք վառ կանաչով:

Մեթոդ 2. Հատուկ լուսավորության գույնը փոխարինեք մեկ այլով

Այս խնդիրն իրականացնելու համար պահանջվում է մակրո:

1. Նախևառաջ, սեղմեք «Alt+F11»՝ VBA խմբագրիչը բացելու համար։
2. Հաջորդը կտտացրեք «Սովորական» նախագծին ձախ սյունակում:
3. Դրանից հետո կտտացրեք «Տեղադրել» ներդիրին ցանկի տողի վրա:
4. Եվ այդ բացվող ընտրացանկում ընտրեք «Մոդուլ»:
5. Կրկնակի սեղմումով բացեք նոր մոդուլը:
6. Այժմ կպցրեք հետևյալ կոդերը.

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. Հաջորդը կտտացրեք «Run» կոճակին կամ սեղմեք «F5»:
8. Դրանից հետո «Նշեք Highlight Color» վանդակում մուտքագրեք մի արժեք, որը ներկայացնում է փոխարինվող գույնը: Հատուկ գույնի համապատասխան արժեք ստանալու համար կարող եք այցելել այս հղումը. https://docs.microsoft.com/en-us/office/vba/api/Word.WdColorIndex
9. Օրինակ, եթե մենք ցանկանում ենք դեղին գույնը փոխարինել վառ կանաչով, ապա «Նշիր լուսավորության գույնը» վանդակում մուտքագրում ենք «7» -ը և կտտացնում «OK»:
10. Դրանից հետո «Նոր Highlight Color» վանդակում մուտքագրեք նոր գույնի արժեք և կտտացրեք «OK»:

Ահա դեղինը վառ կանաչով փոխարինելու հնարավոր արդյունքը:

Խուսափեք տվյալների կորստի աղետից

Բառն այնքան հիանալի օգնական է մեր ամենօրյա աշխատանքում: Ուստի դժվար չէ պատկերացնել, թե ինչ աղետ կարող է բերել այն փլուզվելիս: Քննադատական ​​տվյալները չկորցնելուց խուսափելու համար կարող եք բռնել ա Բառի ուղղում գործիք նախապես: Ձեռք բերելով այդպիսի օգտակար ծրագիր, ձեզ հարկավոր չէ անհանգստանալ տվյալների կորստից:

Հեղինակի ներածություն.

Վերա Չենը տվյալների վերականգնման փորձագետ է DataNumen, Inc., որը տվյալների վերականգման տեխնոլոգիաների համաշխարհային առաջատարն է, այդ թվում կոռումպացված xlsx և pdf նորոգել ծրագրային արտադրանքները: Լրացուցիչ տեղեկությունների համար այցելեք www.datanumen.com