2 Cara Cepat untuk Mengubah Warna Banyak Garis Bawah di Dokumen Word Anda

Bagikan sekarang:

Pada artikel ini, kami akan fokus untuk menjelaskan 2 cara cepat untuk mengubah warna beberapa garis bawah dalam dokumen Word Anda.

Secara default, warna garis bawah di Word diatur sebagai "Otomatis". Tapi terkadang bisa monoton. Jadi untuk mendiversifikasi set warna dalam dokumen Anda, dan menonjolkan konten penting, itu adalah pilihan yang baik untuk mengubah warna garis bawah.

Sangat mudah untuk mengubah warna garis bawah sebelum membuatnya. Oleh karena itu, dalam konten berikut, kami ingin menekankan pada modifikasi warna garis bawah yang ada.

Metode 1: Manfaatkan Fitur "Pencarian Tingkat Lanjut".

Pertama dan terpenting, Anda harus menemukan semua contoh garis bawah dalam dokumen ini. Untuk kebutuhan ini, Anda dapat merujuk ke artikel kami sebelumnya: 2 Cara Cepat Mencari Teks Bergaris Bawah di Dokumen Word Anda

Setelah menemukan dan memilih semua garis bawah, Anda mengambil langkah-langkah berikut:

  1. Anda tinggal klik tombol segitiga terbalik di belakang icon garis bawah di bawah tab “Home”.
  2. Kemudian pilih warna yang Anda suka pada menu tambahan "Underline Color".Klik "Beranda"->Tombol terbalik->Pilih Warna pada Menu Tambahan "Warna Garis Bawah"

Ini adalah demonstrasi video kami:

Metode 2: Jalankan Makro Kata

Makro kata adalah alat yang luar biasa. Kami tidak hanya dapat menggunakannya untuk mencari semua garis bawah tetapi juga mengubah warnanya. Dan kedua prosedur tersebut dapat diselesaikan hanya dalam satu makro.

  1. Untuk memulai, aktifkan tab "Pengembang" dan klik di atasnya.
  2. Kemudian klik "Visual Basic" di grup "Kode".Klik "Pengembang" -> Klik "Visual Basic"
  3. Selanjutnya klik "Normal".
  4. Kemudian klik tab "Sisipkan".
  5. Dan pilih "Modul" di menu.Klik "Normal" -> Klik "Sisipkan" -> Klik "Modul"
  6. Klik dua kali pada modul baru untuk membuka ruang pengeditan.
  7. Sekarang tempel kode di sana:
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
  1. Terakhir, klik tombol "Run".Tempel Kode-> Klik "Jalankan"

Catatan:

  1. Pertama, baris kode “.Font.Underline = wdUnderlineSingle” berarti makro ini hanya menemukan satu garis bawah. Anda dapat mengubah “wdUnderlineSingle” menjadi “wdUnderlineDouble”, “wdUnderlineThick”, dll. Untuk konstanta garis bawah lainnya, Anda dapat mengunjungi tautan ini: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa224269(v=office.11)
  2. Kedua, baris kode “.Replacement.Font.UnderlineColor = wdColorBlue” berarti makro akan mengubah warna garis bawah menjadi biru. Dan untuk konstanta warna lainnya, Anda dapat mengunjungi: https://docs.microsoft.com/en-us/office/vba/api/Word.WdColor

Ambil Data Word yang Disusupi

Kehilangan data di Word sangat mungkin terjadi saat ini. Misalnya, kesalahan paling umum yang akan Anda temui di Word adalah layar membeku. Tentu saja, Anda dapat memilih untuk memulai ulang program. Terkadang, akan ada versi dokumen yang sedang Anda kerjakan yang tersimpan secara otomatis. Namun, kita tidak dapat mengesampingkan atau menerima kemungkinan kehilangan dokumen, baik sepenuhnya maupun sebagian. Oleh karena itu, kita harus memikirkan cara untuk memulihkan data. Dan berbicara tentang itu, seorang profesional Perbaikan kata alat adalah kunci keberhasilannya.

Pengantar Penulis:

Vera Chen adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk alat untuk memperbaiki xls rusak ke pdf memperbaiki produk perangkat lunak. Untuk informasi lebih lanjut kunjungi www.datanumen.com

Bagikan sekarang:

Komentar ditutup.