วิธีลบตัวแบ่งคอลัมน์ทั้งหมดใน Word

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

ลบคอลัมน์ทั้งหมดออกทีละคอลัมน์

ลบตัวแบ่งคอลัมน์ทั้งหมดด้วยฟังก์ชันค้นหาและแทนที่

ลบตัวแบ่งคอลัมน์ทั้งหมดโดยใช้ VBA

ลบตัวแบ่งคอลัมน์ทั้งหมดด้วย Kutools for Word

เครื่องมือเพิ่มประสิทธิภาพที่แนะนำสำหรับ Word

คุณสมบัติขั้นสูงที่มีประสิทธิภาพมากกว่า 100 รายการสำหรับ Word ประหยัดเวลาของคุณ 50% ดาวน์โหลดฟรี

นำการแก้ไขและเรียกดูแบบแท็บไปยัง Office (รวม Word) มีประสิทธิภาพมากกว่าแท็บของเบราว์เซอร์ ดาวน์โหลดฟรี

ลบคอลัมน์ทั้งหมดออกทีละคอลัมน์

Office Tab: นำอินเทอร์เฟซแบบแท็บมาสู่ Word, Excel, PowerPoint...

ปรับปรุงขั้นตอนการทำงานของคุณทันที อ่านเพิ่มเติม ดาวน์โหลดฟรี

1. หากต้องการแสดงเครื่องหมายแบ่งคอลัมน์ในเอกสารโปรดคลิก Home > แสดง / ซ่อนเครื่องหมายการแก้ไข ดังที่แสดงในภาพหน้าจอด้านล่าง

2. เลือกตัวแบ่งคอลัมน์ที่คุณต้องการลบ

3 กด ลบ บนแป้นพิมพ์

กด "Ctrl” เพื่อเลือกคอลัมน์ทั้งหมดแบ่งทีละคอลัมน์แล้วกดปุ่ม Delete แต่การเลือกแบ่งคอลัมน์ทีละคอลัมน์เป็นเรื่องยากและเจ็บปวดหากเอกสารครอบคลุมมากกว่า 200 หน้า

ลบตัวแบ่งคอลัมน์ทั้งหมดด้วยการค้นหาและแทนที่

1 คลิก Home > แทนที่ เพื่อเปิดใช้งานยูทิลิตี้นี้

2 คลิก เพิ่มเติม >> เพื่อแสดงตัวเลือกเพิ่มเติม เห็นภาพหน้าจอ:

3. วางเคอร์เซอร์ในไฟล์ หาอะไร และเลือก ตัวแบ่งคอลัมน์ จาก พิเศษ เมนูแบบเลื่อนลง

4. จะมี“^n” ในไฟล์ หาอะไร ฟิลด์และคลิก แทนที่ทั้งหมด.

ลบตัวแบ่งคอลัมน์ทั้งหมดโดยใช้ VBA

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

1. กด“Alt-F11” เพื่อเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง;

2 คลิก โมดูล บน สิ่งที่ใส่เข้าไป คัดลอกและวางรหัส VBA ต่อไปนี้ลงในหน้าต่างโมดูล

รหัส VBA ของการลบตัวแบ่งคอลัมน์ทั้งหมด:

Delecolumnbreaks ย่อย ()
การเลือก ค้นหา ล้างการจัดรูปแบบ
Selection.Find.Replacement.ClearFormatting
ด้วย Selection.Find
.Text = "^ n"
.Replacement.Text = ""
.Forward = จริง
.wrap = wdFindContinue
.Format = เท็จ
.MatchCase = เท็จ
.MatchWholeWord = เท็จ
.MatchByte = เท็จ
.MatchAllWordForms = เท็จ
.MatchSoundsLike = เท็จ
.MatchWildcards = เท็จ
.MatchFuzzy = เท็จ
จบด้วย
Selection.Find.Execute Replace: = wdReplaceAll
ย่อยสิ้นสุด

3 คลิก เรียกใช้ Macro บนแท็บ Run;

หมายเหตุ: หากไฟล์ ติดตามการเปลี่ยนแปลง เปิดใช้งานฟังก์ชันในเอกสาร VBA นี้ไม่สามารถลบตัวแบ่งคอลัมน์ทั้งหมดได้

ลบตัวแบ่งคอลัมน์ทั้งหมดด้วย kutools for Word

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

Kutools for WordAdd-in ที่ใช้งานง่ายประกอบด้วยกลุ่มฟังก์ชันต่างๆเพื่อความสะดวกในการทำงานและเพิ่มความสามารถในการประมวลผลเอกสาร ทดลองใช้ฟรี 45 วัน! รับไปเดี๋ยวนี้เลย!

1. โปรดใช้ยูทิลิตี้นี้โดยคลิก Kutools > แบ่ง > ลบตัวแบ่งคอลัมน์. ดูภาพหน้าจอ:

2. คุณจะเห็นตัวแบ่งคอลัมน์ทั้งหมดจะถูกลบออกจากเอกสารทั้งหมด

ยูทิลิตี้นี้ยังสามารถลบการแบ่งคอลัมน์ทั้งหมดออกจากส่วนหนึ่งของเอกสารสำหรับข้อมูลเพิ่มเติมเกี่ยวกับยูทิลิตี้นี้โปรดไปที่ โปรดคลิกที่นี่เพื่ออ่านรายละเอียดเพิ่มเติม.