2 Cara Pintar untuk Menunjukkan Semua Penanda Halaman dalam Dokumen Word Anda

Dalam artikel ini, kami ingin memberi anda 2 cara pintar untuk menunjukkan semua penanda halaman dalam dokumen Word anda.

Sesekali, kami memasukkan penanda buku untuk pilihan teks yang ingin kami kunjungi kemudian. Tetapi sifat penanda buku di Word menjadikannya tidak senang untuk dikenal pasti. Dengan kata lain, kita tidak dapat melihat penanda halaman secara langsung tanpa menukar beberapa pilihan di Word.    

Artikel ini dikhaskan untuk membantu anda melihat penanda halaman dengan cara yang jelas. Anda boleh memilih kaedah latihan.

Kaedah 1: Tunjukkan Kurungan Penanda Buku

1. Pertama sekali, klik tab "Fail" dalam Reben.
2. Kemudian klik "Pilihan" untuk membuka kotak dialog "Pilihan Kata".
3. Klik seterusnya "Lanjutan" di lajur kiri.
4. Tatal ke bawah ke bahagian "Tunjukkan kandungan dokumen" dan tandakan kotak "Tunjukkan penanda halaman".
5. Akhirnya, klik "OK" untuk menyimpan pengubahsuaian.

Kini terdapat tanda kurung persegi di sekitar item yang ditanda buku. Anda dapat melihat tanda kurung ini berwarna kelabu yang kadang-kadang tidak begitu jelas. Dan anda mungkin mengelirukan mereka dengan tanda kurung persegi biasa.

Oleh itu, kami ingin mengesyorkan anda makro untuk menonjolkan penanda halaman agar menonjolkannya dengan cara yang lebih baik.

Kaedah 2: Serlahkan Pelbagai Penanda Halaman

1. Sebagai permulaan, tekan "Alt + F11" untuk memanggil penyunting VBA.
2. Klik seterusnya projek "Normal".
3. Kemudian klik tab “Insert” pada bar menu dan pilih “Module” pada menu drop-down.
4. Dan klik dua kali pada modul baru untuk membuka ruang penyuntingannya di sebelah kanan.
5. Tampal makro berikut di sana:

Sub HighlightBookmarkedItemsInADoc()
  Dim objBookmark As Bookmark
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
 
  With objDoc
    For Each objBookmark In .Bookmarks
      objBookmark.Range.HighlightColorIndex = wdBrightGreen
    Next objBookmark
  End With
  Application.ScreenUpdating = True
End Sub

6. Akhir sekali, klik "Jalankan" atau tekan "F5".

Perkara seterusnya yang anda lihat ialah semua penanda halaman diserlahkan dengan warna hijau, seperti di bawah:

Makro di atas menyerlahkan semua penanda halaman dalam dokumen aktif semasa. Sekiranya terdapat beberapa dokumen untuk diproses, maka anda memerlukan makro ini sebagai gantinya:

Sub HighlightBookmarkedItemsInMultiDoc()
  Dim StrFolder As String
  Dim strFile As String
  Dim objDoc As Document
  Dim dlgFile As FileDialog
 
  Set dlgFile = Application.FileDialog(msoFileDialogFolderPicker)
 
  With dlgFile
    If .Show = -1 Then
      StrFolder = .SelectedItems(1) & "\"
    Else
      MsgBox "You need to select a folder first!"
      Exit Sub
    End If
  End With
 
  strFile = Dir(StrFolder & "*.docx", vbNormal)
 
  While strFile <> ""
    Set objDoc = Documents.Open(FileName:=StrFolder & strFile)
    Set objDoc = ActiveDocument
    With objDoc
      For Each objBookmark In .Bookmarks
        objBookmark.Range.HighlightColorIndex = wdBrightGreen
      Next objBookmark
    End With
    objDoc.Save
    objDoc.Close
    strFile = Dir()
 Wend
End Sub

Sebelum menjalankan makro ini, anda perlu meletakkan semua dokumen sasaran dalam folder yang sama. Dan menjalankan makro akan mencetuskan tetingkap "Semak Imbas". Pilih sahaja folder tempat anda menyimpan dokumen anda.

Utiliti untuk Membaiki Dokumen

Sekiranya anda mengalami Kerosakan perkataan, ada kemungkinan besar ia dapat menghapus beberapa maklumat penting dari komputer anda. Tidak ada masalah jika anda mempunyai cadangan terkini untuk dirujuk. Namun, jika tidak, anda akan memerlukan alat pembaikan dengan segera.

Pengenalan Pengarang:

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