2 Kaedah Berguna untuk Mengganti Warna Sorotan dalam Dokumen Word Anda

Dalam artikel ini, kami dengan senang hati menunjukkan kepada anda 2 kaedah berguna untuk menggantikan warna sorotan dalam dokumen Word anda.

Kadang-kadang anda mungkin menyerlahkan isi yang berbeza dengan warna yang berbeza. Tetapi tidak seperti warna fon, anda tidak dapat menggunakan "Cari dan Ganti" untuk mencari teks dalam warna sorotan tertentu dan menggantinya dengan yang lain.

Oleh itu, kita akan memerlukan beberapa penyelesaian. Berikut adalah 2 cara yang tersedia untuk kes yang berbeza.

Kaedah 1: Ganti Semua Warna Sorotan dengan Yang Sama

Warna sorotan yang berkaitan dengan kotak dialog "Cari dan Ganti" adalah warna semasa yang dipilih dalam ikon Sorotan.

1. Pertama sekali, di bawah tab "Laman Utama" dan dalam kumpulan "Font", klik pada butang tarik-turun pada perintah "Warna Sorotan Teks". Pilih warna yang anda mahu ubah semua warna sorotan. Sebagai contoh, kami memilih "Hijau Cerah" di sini.
2. Kemudian tekan "Ctrl + H" untuk mencetuskan kotak dialog "Cari dan Ganti".
3. Letakkan kursor di dalam kotak teks "Cari apa".
4. Klik "Lagi" untuk mengeluarkan lebih banyak pilihan dan klik "Format".
5. Dan pilih "Sorotan".
6. Seterusnya masukkan kursor ke dalam kotak "Ganti dengan" dan ulangi langkah 4 dan 5.
7. Terakhir, klik "Ganti Semua".

Sekarang anda telah mengganti semua warna sorotan dengan hijau terang.

Kaedah 2: Ganti Warna Sorotan Spesifik dengan Yang Lain

Untuk menyelesaikan tugas ini, makro diperlukan.

1. Pertama sekali, tekan "Alt + F11" untuk membuka editor VBA.
2. Klik seterusnya projek "Normal" di lajur kiri.
3. Kemudian klik tab "Masukkan" pada bar menu.
4. Dan pilih "Modul" pada menu lungsur.
5. Buka modul baru dengan klik dua kali.
6. Sekarang tampal kod berikut:

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. Seterusnya klik butang "Jalankan" atau tekan "F5".
8. Kemudian di kotak "Tentukan Warna Sorotan", masukkan nilai mewakili warna yang akan diganti. Untuk mendapatkan nilai warna tertentu yang sesuai, anda boleh melayari pautan ini: https://docs.microsoft.com/en-us/office/vba/api/Word.WdColorIndex
9. Sebagai contoh, jika kita ingin mengganti warna kuning dengan hijau terang, kita memasukkan "7" di kotak "Tentukan Warna Sorotan" dan klik "OK".
10. Kemudian dalam kotak "Warna Sorotan Baru", masukkan nilai warna baru dan klik "OK".

Berikut adalah kemungkinan hasil penggantian kuning dengan hijau terang.

Elakkan Bencana Kehilangan Data

Word adalah penolong yang sangat baik dalam pekerjaan seharian kita. Oleh itu, tidak sukar untuk membayangkan malapetaka yang ditimpanya ketika ia runtuh. Untuk mengelakkan kehilangan data kritikal, anda boleh mendapatkan maklumat mengenai a Pembetulan perkataan alat di muka. Dengan kemudahan yang ada, anda tidak perlu risau akan kehilangan data.

Pengenalan Pengarang:

Vera Chen adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk xlsx rosak dan pdf membaiki produk perisian. Untuk maklumat lebih lanjut, lawati www.datanumen.com