จะลบแถวอื่น ๆ ใน Excel ได้อย่างไร?

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

ลบแถวอื่น ๆ ใน Excel ด้วยคำสั่ง Filter

ลบแถวอื่น ๆ ใน Excel ด้วยรหัส VBA

ลบแถวหรือคอลัมน์อื่น ๆ ทั้งหมดใน Excel ด้วย Kutools for Excel

ลบแถวอื่น ๆ ใน Excel ด้วยคำสั่ง Filter

Microsoft Excel ของ ตัวกรอง คำสั่งสามารถช่วยคุณกรองแถวอื่น ๆ ทั้งหมดได้อย่างรวดเร็วแล้วลบออกพร้อมกันโปรดทำดังนี้:

1. ในคอลัมน์ว่างนอกเหนือจากข้อมูลต้นฉบับให้ป้อน 0,1,0,1 …, 0,1. ในกรณีนี้ให้ป้อนตัวเลขในคอลัมน์ผู้ช่วยเหลือ C ดูภาพหน้าจอต่อไปนี้:

2. เลือกคอลัมน์ C แล้วคลิก ตัวกรอง ใต้ปุ่ม ข้อมูล แท็บ จากนั้นคลิกปุ่มลูกศรข้าง C1 และเลือกเฉพาะไฟล์ 0 ภายใต้ เลือกทั้งหมด ตัวเลือก ดูภาพหน้าจอ:

3. จากนั้นแถวทั้งหมดที่มี 1 จะถูกซ่อนไว้ เลือกแถวที่มองเห็นได้ด้วย 0 แล้วคลิก หน้าแรก > ลบ > ลบแถวแผ่นงาน เพื่อลบแถวเหล่านี้ จากนั้นจะลบแถวอื่น ๆ ทั้งหมดและคุณต้องคลิก ตัวกรอง อีกครั้งเพื่อแสดงเฉพาะแถวที่มี 1. ดูภาพหน้าจอ:

4. ในที่สุดคุณสามารถลบตัวช่วยคอลัมน์ C ได้ตามที่คุณต้องการ

ลบแถวอื่น ๆ ใน Excel ด้วยรหัส VBA

จริงๆแล้วมาโคร VBA ก็เป็นตัวเลือกที่ดีในการแก้ไขปัญหานี้เช่นกัน

1. ค้างไว้ อื่น ๆ + F11 ใน Excel และจะเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

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

รหัส VBA: ลบทุกแถวอื่น ๆ ในการเลือก:

Sub DeleteEveryOtherRow()
'Updateby Extendoffice
Dim rng As Range
Dim InputRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Application.ScreenUpdating = False
For i = InputRng.Rows.Count To 1 Step -2
    Set rng = InputRng.Cells(i, 1)
    rng.EntireRow.Delete
Next
Application.ScreenUpdating = True
End Sub

3. กด F5 กุญแจสำคัญในการเรียกใช้แมโครนี้ จากนั้นกล่องโต้ตอบจะปรากฏขึ้นเพื่อเลือกช่วง ดูภาพหน้าจอ:

4. จากนั้นคลิก OKทุกแถวอื่น ๆ ในช่วงที่เลือกจากแถวที่สองจะถูกลบพร้อมกันดูภาพหน้าจอ:

ลบแถวหรือคอลัมน์อื่น ๆ ทั้งหมดใน Excel ด้วย Kutools for Excel

สำหรับผู้ใช้ Microsoft Excel ระดับเริ่มต้นการใช้แมโคร VBA มีความซับซ้อนเล็กน้อย เลือก Interval Rows & Columns ประโยชน์ของ Kutools สำหรับ Excel สามารถช่วยคุณลบแถวอื่น ๆ ได้อย่างรวดเร็ว

หลังจากการติดตั้ง Kutools สำหรับ Excelโปรดดำเนินการดังนี้:

1. เลือกช่วงที่คุณต้องการลบแถวอื่น ๆ จากนั้นใช้ยูทิลิตี้นี้โดยคลิกที่ไฟล์ Kutools > เลือก > เลือกแถวและคอลัมน์ช่วงเวลา ....

2. ใน เลือก Interval Rows & Columns กล่องโต้ตอบระบุการตั้งค่าตามภาพหน้าจอต่อไปนี้ที่แสดงและคลิก OK เพื่อเลือกแถวอื่น ๆ ก่อน

3. จากนั้นทุกแถวในการเลือกจะถูกเลือกและไฮไลต์ ดูภาพหน้าจอ:

4. จากนั้นคุณสามารถลบแถวอื่น ๆ ที่เลือกทั้งหมดได้อย่างรวดเร็วโดยคลิกที่ไฟล์ หน้าแรก > ลบ > ลบแถวแผ่นงาน เพื่อลบแถวเหล่านี้ทั้งหมด ดูภาพหน้าจอ:

ด้วยคุณสมบัตินี้คุณยังสามารถลบทุกแถวหรือคอลัมน์ที่ n ได้ตามที่คุณต้องการ

ดาวน์โหลดและทดลองใช้ Kutools for Excel ฟรีทันที!