2 Cara Pantas untuk Mengubah Jenis Pecahan Bahagian dalam Dokumen Word Anda

Dalam artikel ini, akan ada 2 cara cepat untuk anda mengubah jenis pemecahan bahagian dalam dokumen Word anda.

Jenis pemisah bahagian yang paling banyak digunakan dalam Word ialah "Halaman Seterusnya" dan "Berterusan". Untuk memasukkan yang pertama bermaksud memulakan halaman baharu untuk bahagian baharu. Ini membahagikan bahagian dalam paparan yang jelas. Tetapi apabila melibatkan percetakan, ekstrak kertas diperlukan. Sudah tentu, ia bukan cara yang mesra alam. Kemudian anda boleh mempertimbangkan untuk menggunakan pemisah "Berterusan", yang boleh menjimatkan banyak kertas tetapi mungkin tidak berfungsi dengan baik dalam memenuhi permintaan pemisahan.

Oleh itu, kami ingin memperkenalkan cara yang anda pilih mengikut keperluan tertentu.

Kaedah 1: Ubah Persediaan Halaman

1. Pertama sekali, letakkan kursor di dalam bahagian sasaran dan klik tab "Tata Letak Halaman" dalam Reben.
2. Seterusnya klik butang anak panah dalam kumpulan "Penyediaan Halaman" untuk membuka kotak dialog nama yang sama.
3. Kemudian klik tab “Layout” di dalam kotak.
4. Dan pilih jenis pemisah bahagian yang diingini daripada kotak kombo “Permulaan bahagian”.
5. Selanjutnya di kotak kombo "Terapkan ke", pilih julat penerapan. Anda juga boleh memilih untuk menukar jenis rehat seksyen atau beberapa bahagian. 

Inilah hasilnya:

Kaedah 2: Jalankan Makro Word untuk Menukar Jenis Pecahan Semua Bahagian dalam Dokumen

1. Untuk bermula, tekan "Alt + F11" untuk mengaktifkan editor VBA dalam Word.
2. Seterusnya klik projek "Normal" dan klik tab "Masukkan" pada bar menu.
3. Kemudian pilih "Module" pada menu drop-down.
4. Klik dua kali seterusnya pada modul baru untuk membukanya.
5. Sekarang di ruang penyuntingan, tampalkan kod ini:

Sub ChangeNextPageBreakToContinuous()
  Dim nSectionNum As Integer
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
  nSectionNum = objDoc.Sections.Count

  For nSectionNum = nSectionNum To 1 Step -1
    With objDoc.Sections(nSectionNum).Range.PageSetup
      If .SectionStart = wdSectionNewPage Then
        .SectionStart = wdSectionContinuous
      End If
    End With
  Next nSectionNum
 
  Application.ScreenUpdating = True
End Sub

6. Tekan "F5" untuk menjalankan makro.

Makro ini akan mengubah semua jeda bahagian dalam jenis "Halaman Selanjutnya" menjadi "Berterusan". Hasilnya sama dengan kaedah 1.

Sekarang jika anda perlu mengubah semua jeda bahagian berterusan ke jenis "Halaman Selanjutnya", gunakan makro berikut:

Sub ChangeContinuousBreakToNextPageBreak()
  Dim nSectionNum As Integer
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
  nSectionNum = objDoc.Sections.Count

  For nSectionNum = nSectionNum To 1 Step -1
    With objDoc.Sections(nSectionNum).Range.PageSetup
      If .SectionStart = wdSectionContinuous Then
        .SectionStart = wdSectionNewPage
      End If
    End With
  Next nSectionNum
 
  Application.ScreenUpdating = True
End Sub

Alat untuk Membaiki Dokumen

Tidak mungkin menemui masalah Word dan berakhir dengan docx rosak. Oleh itu, anda mesti segera bertindak. Dan cara terpantas untuk memulihkan data anda adalah dengan memilih alat pembaikan yang berkelayakan.

Pengenalan Pengarang:

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