2 วิธีด่วนในการเปลี่ยนประเภทของการแบ่งส่วนในเอกสาร Word ของคุณ

แบ่งปันเลย:

ในบทความนี้จะมี 2 วิธีที่รวดเร็วในการเปลี่ยนประเภทของตัวแบ่งส่วนในเอกสาร Word ของคุณ

รูปแบบการแบ่งส่วนที่ใช้บ่อยที่สุดใน Word คือ “ขึ้นหน้าใหม่” และ “ต่อเนื่อง” การใช้แบบแรกหมายถึงการขึ้นหน้าใหม่สำหรับส่วนใหม่ ซึ่งจะแบ่งส่วนต่างๆ ได้อย่างชัดเจน แต่เมื่อถึงเวลาพิมพ์ จะต้องพิมพ์เอกสารจำนวนมาก ซึ่งแน่นอนว่าไม่เป็นมิตรต่อสิ่งแวดล้อม ดังนั้น คุณอาจพิจารณาใช้การแบ่งส่วนแบบ “ต่อเนื่อง” ซึ่งจะช่วยประหยัดกระดาษได้มาก แต่ก็อาจไม่ตอบโจทย์เรื่องการแบ่งส่วนที่ชัดเจนเท่าที่ควร

ดังนั้นเราจึงต้องการแนะนำวิธีที่คุณสามารถเลือกได้ตามความต้องการเฉพาะเปลี่ยนประเภทของตัวแบ่งส่วนในเอกสาร Word ของคุณ

วิธีที่ 1: เปลี่ยนการตั้งค่าหน้ากระดาษ

  1. ขั้นแรก ให้วางเคอร์เซอร์ไว้ภายในส่วนที่ต้องการแก้ไข แล้วคลิกแท็บ “เค้าโครงหน้ากระดาษ” ในแถบ Ribbon
  2. จากนั้นคลิกปุ่มลูกศรในกลุ่ม“ การตั้งค่าหน้ากระดาษ” เพื่อเปิดกล่องโต้ตอบชื่อเดียวกัน
  3. จากนั้นคลิกแท็บ "เค้าโครง" ในช่อง
  4. จากนั้นเลือกประเภทการแบ่งส่วนที่ต้องการจากช่องคอมโบของ “จุดเริ่มต้นส่วน”
  5. ถัดไปในกล่องคำสั่งผสม“ ใช้กับ” เลือกช่วงที่ใช้ คุณสามารถเลือกที่จะเปลี่ยนประเภทของตัวแบ่งส่วนเดียวหรือหลายส่วนได้เช่นกัน คลิก "เค้าโครงหน้ากระดาษ" -> คลิกปุ่มลูกศร -> คลิก "เค้าโครง" -> เลือกตำแหน่งที่ส่วนนั้นเริ่มต้น -> เลือกช่วงที่ใช้ -> คลิก "ตกลง"

นี่คือผลลัพธ์:ผลของการเปลี่ยนประเภทของตัวแบ่งส่วน

วิธีที่ 2: เรียกใช้ Word Macro เพื่อเปลี่ยนประเภทของตัวแบ่งส่วนทั้งหมดในเอกสาร

  1. เริ่มต้นด้วยการกดปุ่ม “Alt+F11” เพื่อเรียกใช้ตัวแก้ไข VBA ใน Word
  2. จากนั้นคลิกโครงการ“ ปกติ” แล้วคลิกแท็บ“ แทรก” บนแถบเมนู
  3. จากนั้นเลือก "โมดูล" ในเมนูแบบเลื่อนลงคลิก "Normal" -> คลิก "Insert" -> คลิก "Module"
  4. ดับเบิลคลิกถัดไปที่โมดูลใหม่เพื่อเปิด
  5. ตอนนี้อยู่ในพื้นที่แก้ไขให้วางรหัสเหล่านี้:
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
  1. กด "F5" เพื่อเรียกใช้มาโครวางรหัส -> คลิก "เรียกใช้"

มาโครนี้จะเปลี่ยนตัวแบ่งส่วนทั้งหมดในประเภท "หน้าถัดไป" เป็น "ต่อเนื่อง" ผลลัพธ์จะเหมือนกับวิธีที่ 1

ตอนนี้หากคุณต้องการเปลี่ยนตัวแบ่งส่วนต่อเนื่องทั้งหมดเป็นประเภท "หน้าถัดไป" ให้ใช้มาโครต่อไปนี้:

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

เครื่องมือในการซ่อมแซมเอกสาร

ไม่น่าจะเจอปัญหา Word และจบลงด้วย docx เสียหาย. ดังนั้นคุณต้องดำเนินการทันที และวิธีที่เร็วที่สุดในการกู้คืนข้อมูลของคุณคือการเลือกเครื่องมือซ่อมแซมที่มีคุณสมบัติเหมาะสม

บทนำผู้เขียน:

Vera Chen เป็นผู้เชี่ยวชาญด้านการกู้คืนข้อมูลใน DataNumen, Inc. ซึ่งเป็นผู้นำระดับโลกด้านเทคโนโลยีการกู้คืนข้อมูล ได้แก่ ซ่อม xls และ pdf ซ่อมแซมผลิตภัณฑ์ซอฟต์แวร์ ดูข้อมูลเพิ่มเติมได้ที่ wwwdatanumenด้วย.

แบ่งปันเลย:

ความเห็นถูกปิด