3 Cara Batch Buang Warna Isi Pelbagai Bentuk dalam Dokumen Word Anda

Dalam catatan ini, kami dengan senang hati akan menunjukkan kepada anda 3 kaedah berkesan untuk membuang warna isian berbilang bentuk dalam dokumen Word anda secara berkumpulan.

Semasa memasukkan bentuk ke dalam dokumen Word, anda juga boleh menggunakan warna isian pada mereka. Sangat mudah untuk menambah atau membuang warna pengisian satu bentuk. Tetapi ketika berkaitan dengan pemprosesan kumpulan, kita akan memerlukan beberapa tipu daya.

Kali ini, kami ingin menunjukkan kepada anda bagaimana secara berkumpulan membuang warna isi dari pelbagai bentuk dalam dokumen. Oleh itu, anda boleh mengisinya semula dengan warna yang diingini atau membiarkan bentuk di latar belakang kosong. Berikut adalah 3 kaedah yang dapat membantu anda dalam pelbagai kes.

Kaedah 1: Keluarkan Warna Isi Pelbagai Bentuk pada Halaman

1. Pertama sekali, klik tab "Rumah" di Pita.
2. Kemudian klik perintah "Pilih" dalam kumpulan "Mengedit".
3. Pada menu lungsur turun, pilih "Selection Pane".
4. Sekarang di panel "Pemilihan dan Keterlihatan", anda dapat melihat semua nama bentuk di halaman ini. Tekan "Ctrl" untuk memilih bentuk yang anda perlukan.
5. Kemudian klik "Format" di Pita.
6. Klik seterusnya "Shape Fill".
7. Pilih "Tanpa Isi" pada menu drop-down

Kaedah 2: Batch Buang Warna Isi Semua Bentuk dalam Dokumen

1. Pertama sekali, jika tab "Pembangun" tersedia, klik padanya dan kemudian klik "Visual Basic" untuk membuka editor VBA. Jika "Pembangun" belum diaktifkan, tekan "Alt+ F11".
2. Sekarang di editor, klik projek "Normal" di sebelah kiri.
3. Kemudian klik "Masukkan" pada bar menu.
4. Seterusnya pilih "Module" pada menu drop-down.
5. Klik dua kali pada modul baru untuk membukanya dan tampal kod ini di sana:

Sub RemoveAllShapeFill()
  Dim objShape As Shape
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
  Set objDoc = ActiveDocument
 
  For Each objShape In objDoc.Shapes
    objShape.Fill.Visible = False
    objShape.Line.Visible = msoTrue
  Next objShape
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

6. Terakhir, klik butang "Jalankan" atau tekan "F5" untuk melaksanakan kod.

Kaedah 3: Keluarkan Warna Isi Semua Kotak Teks dalam Dokumen

Kotak teks tergolong dalam kategori bentuk. Sekiranya anda ingin mengeluarkan warna isi semua kotak teks tetapi tetap seperti bentuk lain, anda boleh menggunakan cara ini.

1. Pertama, ulangi langkah dalam kaedah 2 untuk memasang dan menjalankan makro.
2. Dan kali ini, gantikan makro itu dengan yang berikut:

Sub RemoveTextBoxFill()
  Dim objShape As Shape
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
  Set objDoc = ActiveDocument
 
  For Each objShape In objDoc.Shapes
    If objShape.Type = msoTextBox Then
      objShape.Fill.Visible = msoFalse
      objShape.Line.Visible = msoTrue
    Else
      Exit For
    End If
  Next objShape
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

Inilah hasilnya:

Pulihkan Dokumen yang Rosak dengan pantas

Jika anda mengalami kerosakan dokumen, jangan panik. Perlu diingat bahawa kebanyakan dokumen boleh dipulihkan. Apa yang perlu anda lakukan ialah meluangkan masa dan mendapatkan doc betulkan alat. Pada masa kini, utiliti seperti ini dapat membantu dalam mendapatkan kembali data anda.

Pengenalan Pengarang:

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