5 Cara Cepat Menghapus Poin dan Daftar Nomor dari Dokumen Word Anda

Pada artikel ini, kami ingin menunjukkan kepada Anda 5 cara mudah untuk menghapus poin dan nomor daftar dari dokumen Word Anda.

Dokumen bisa berisi daftar berpoin dan bernomor. Terkadang, Anda mungkin perlu memformat ulang daftar ini. Misalnya, Anda mungkin perlu mengatur konten daftar dalam teks tebal, miring, atau biasa, untuk beberapa nama saja. Kemudian Anda harus menghapus semua peluru dan nomor daftar terlebih dahulu.

Berikut 5 solusi untuk berbagai kasus.

Metode 1: Setel Peluru atau Penomoran "Tidak Ada"

1. Pertama-tama, pilih entri berpoin dan bernomor yang tidak diinginkan.
2. Kemudian klik tombol drop-down pada "Bullets" atau "Numbering".
3. Klik "Tidak Ada".

Periksa hasilnya:

Metode 2: Setel Gaya "Normal" untuk Entri Berpoin atau Bernomor

1. Untuk memulai, pilih entri yang tidak perlu.
2. Kedua, klik tab "Beranda" di Pita.
3. Kemudian klik tombol "Lainnya" di grup "Gaya".
4. Selanjutnya pilih "Normal".
5. Atau Anda dapat menekan "Ctrl + Shift + N" di langkah 2 sebagai gantinya.

Metode 3: Hapus Semua Peluru dalam Dokumen

1. Pertama dan depanost, tekan "Alt + F11" untuk membuka editor VBA di Word.
2. Di editor, klik proyek "Normal".
3. Kemudian klik tab "Sisipkan" dan pilih "Modul".
4. Klik dua kali modul baru untuk menampilkan area pengeditan dan tempel makro berikut di sana:

Sub RemoveAllBulletsInADoc()
  Dim objParagraph As Paragraph
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
  Set objDoc = ActiveDocument
 
  For Each objParagraph In ActiveDocument.Paragraphs
    If objParagraph.Range.ListFormat.ListType = WdListType.wdListBullet Then
      objParagraph.Range.ListFormat.RemoveNumbers
    End If
  Next objParagraph
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

5. Terakhir, klik "Run" atau tekan "F5".

Inilah hasilnya:

Metode 4: Hapus Semua Nomor Daftar dalam Dokumen

1. Pertama, ulangi langkah-langkah di metode 3 untuk menginstal dan menjalankan makro.
2. Hanya Anda yang membutuhkan makro ini:

Sub RemoveAllListNumbersInADoc()
  Dim objParagraph As Paragraph
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
  Set objDoc = ActiveDocument
 
  For Each objParagraph In objDoc.Paragraphs
    If objParagraph.Range.ListFormat.ListType = wdListSimpleNumbering Then
      objParagraph.Range.ListFormat.RemoveNumbers
    End If
  Next objParagraph
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

Metode 5: Hapus Semua Poin dan Cantumkan Nomor dalam Dokumen

Sekarang jika Anda perlu menghapus poin dan nomor daftar, Anda dapat menggunakan makro berikut:

Sub RemoveBulletsAndListBumbers()
  Dim objParagraph As Paragraph
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
  Set objDoc = ActiveDocument
 
  For Each objParagraph In objDoc.Paragraphs
    If objParagraph.Range.ListFormat.ListType = WdListType.wdListBullet Or wdListSimpleNumbering Then
      objParagraph.Range.ListFormat.RemoveNumbers
    End If
  Next objParagraph
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

Pilih Alat Perbaikan yang Dapat Dipercaya

Mengingat fakta bahwa Word rentan terhadap kesalahan, ada banyak alat perbaikan yang dirancang untuk itu perbaiki Word. Namun, Anda harus cukup memperhatikan saat memilih utilitas semacam itu, terutama di saat darurat. Ingatlah bahwa alat yang tidak dapat diandalkan dapat menyebabkan kerusakan lebih lanjut pada data Anda.

Pengantar Penulis:

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