У цій статті ми зосередимося на поясненні двох швидких способів групової зміни кольору кількох підкреслення у вашому документі Word.
За замовчуванням колір підкреслення у програмі Word встановлений як “Автоматичний”. Але іноді це може бути одноманітно. Отже, щоб урізноманітнити колір, встановлений у вашому документі, і виділити важливий вміст, гарним вибором є змінити колір підкреслення.
Легко змінити колір підкреслення перед його створенням. Тому в наступному змісті ми хотіли б зробити акцент на зміні кольору існуючих підкреслень.
Спосіб 1: Використовуйте функцію «Розширений пошук»
Перш за все, вам потрібно знайти всі випадки підкреслення в поточному документі. Для цього ви можете звернутися до нашої попередньої статті: 2 швидкі способи пошуку підкреслених текстів у документі Word
Після того, як ви знайдете та підкреслили всі підкреслення, ви зробите наведені нижче кроки:
- Ви просто натискаєте перевернуту кнопку трикутника за значком підкреслення на вкладці «Головна».
- Потім виберіть колір, який вам подобається, у розширеному меню «Колір підкреслення».

Ось наша відео демонстрація:
Спосіб 2: Запустіть макрос Word
Макрос Word - це такий чудовий інструмент. Ми можемо не тільки використовувати його для пошуку всіх підкреслення, але й змінити їх колір. І обидві процедури можна закінчити лише за одним макросом.
- Для початку активуйте вкладку «Розробник» і натисніть на неї.
- Потім натисніть “Visual Basic” у групі “Код”.
- Далі натисніть “Звичайний”.
- Потім натисніть вкладку “Вставити”.
- І виберіть «Модуль» у меню.
- Двічі клацніть новий модуль, щоб відкрити простір для редагування.
- Тепер вставте туди наведені нижче коди:
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
- І останнє, але не менш важливе, натисніть кнопку «Виконати».
примітки:
- По-перше, рядок коду “.Font.Underline = wdUnderlineSingle” означає, що цей макрос знаходить лише окремі підкреслення. Ви можете змінити “wdUnderlineSingle” на “wdUnderlineDouble”, “wdUnderlineThick” тощо. Щоб отримати більше констант підкреслення, перейдіть за цим посиланням: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa224269(v=office.11)
- По-друге, рядок коду ".Replacement.Font.UnderlineColor = wdColorBlue" означає, що макрос змінить колір підкреслення на синій. А щоб отримати більше констант кольору, ви можете відвідати: https://docs.microsoft.com/en-us/office/vba/api/Word.WdColor
Отримати компрометовані дані Word
Втрата даних у Word сьогодні є дуже можливою. Наприклад, найпоширенішою помилкою, з якою ви зіткнетеся у Word, є зависання екрана. Звичайно, ви можете перезапустити програму. Іноді може бути автоматично збережена версія документа, над яким ви працюєте. Однак ми не можемо виключати або допускати можливості повної або часткової втрати документа. Тому ми повинні продумати способи відновлення даних. І якщо говорити про це, професіонал... Відновлення слів інструмент - запорука його успіху.
Вступ автора:
Віра Чень є експертом з відновлення даних у DataNumen, Inc., яка є світовим лідером у технологіях відновлення даних, включаючи інструмент для ремонту пошкоджений XLS та pdf ремонт програмних продуктів. Для отримання додаткової інформації відвідайте WWW.datanumen.com


