สารบัญ
บทช่วยสอนสั้นๆ นี้จะอธิบายวิธีการลบแถวอื่นๆ ทุกแถวใน Excel โดยการกรองหรือด้วยโค้ด VBA คุณจะได้เรียนรู้วิธีลบแถวที่ 3, 4 หรือ N อื่นๆ ทุกแถว
มีหลายสถานการณ์ที่คุณอาจจำเป็นต้องลบแถวอื่นในเวิร์กชีต Excel ตัวอย่างเช่น คุณอาจต้องการเก็บข้อมูลสัปดาห์คู่ (แถว 2, 4, 6, 8 ฯลฯ) และย้ายสัปดาห์คี่ทั้งหมด (แถว 3, 5, 7 ฯลฯ) ไปยังแผ่นงานอื่น
โดยทั่วไป การลบทุกแถวที่เหลือใน Excel จะกลายเป็นการเลือกแถวสำรอง เมื่อเลือกแถวแล้ว การขีดเส้นเดียวบนปุ่ม ลบ ก็เพียงพอแล้ว นอกจากนี้ในบทความนี้ คุณจะได้เรียนรู้เทคนิคบางอย่างในการเลือกและลบแถวที่ N หรือทุกแถวใน Excel อย่างรวดเร็ว
วิธีลบแถวอื่นๆ ใน Excel โดยการกรอง
โดยพื้นฐานแล้ว วิธีทั่วไปในการลบแถวอื่นๆ ทุกแถวใน Excel คือขั้นแรก ให้คุณกรองแถวสำรอง จากนั้นเลือกแถวเหล่านั้น และลบทั้งหมดพร้อมกัน ขั้นตอนโดยละเอียดด้านล่าง:
- ในคอลัมน์ว่างถัดจากข้อมูลต้นฉบับของคุณ ให้ป้อนลำดับของศูนย์และหนึ่ง คุณสามารถทำได้อย่างรวดเร็วโดยพิมพ์ 0 ในเซลล์แรกและ 1 ในเซลล์ที่สอง จากนั้นคัดลอกสองเซลล์แรกและวางลงในคอลัมน์จนถึงเซลล์สุดท้ายที่มีข้อมูล
หรืออีกวิธีหนึ่ง คุณสามารถใช้สูตรนี้:
=MOD(ROW(),2)
ตรรกะของสูตรนั้นง่ายมาก: ฟังก์ชัน ROW จะส่งคืนหมายเลขแถวปัจจุบัน ฟังก์ชัน MODหารด้วย 2 และส่งกลับเศษที่เหลือที่ปัดเศษเป็นจำนวนเต็ม
ผลลัพธ์คือ คุณมี 0 ในแถวคู่ทั้งหมด (เพราะถูกหารด้วย 2 เท่าๆ กันโดยไม่มีเศษเหลือ) และ 1 ในแถวคี่ทั้งหมด:
- ขึ้นอยู่กับว่าคุณต้องการลบแถวคู่หรือคี่ กรองแถวหนึ่งหรือศูนย์ออก
เมื่อต้องการดำเนินการ ให้เลือกเซลล์ใดก็ได้ในคอลัมน์ Helper ของคุณ ไปที่แท็บ ข้อมูล > กลุ่มเรียงและกรอง แล้วคลิก ตัวกรอง ปุ่ม. ลูกศรตัวกรองแบบเลื่อนลงจะปรากฏในเซลล์ส่วนหัวทั้งหมด คุณคลิกปุ่มลูกศรในคอลัมน์ Helper และเลือกช่องใดช่องหนึ่ง:
- 0 เพื่อลบแถวคู่
- 1 เพื่อลบแถวคี่
ในตัวอย่างนี้ เราจะลบแถวที่มีค่า "0" ออก ดังนั้นเราจึงกรอง:
- เมื่อแถว "1" ทั้งหมดถูกซ่อน เลือกแถว "0" ที่มองเห็นทั้งหมด คลิกขวาที่ส่วนที่เลือก แล้วคลิก ลบแถว :
- ขั้นตอนข้างต้นทำให้คุณมีตารางว่าง แต่ไม่ต้องกังวล แถว "1" ยังคงอยู่ หากต้องการให้มองเห็นได้อีกครั้ง เพียงนำตัวกรองอัตโนมัติออกโดยคลิกปุ่ม ตัวกรอง อีกครั้ง:
- สูตรในคอลัมน์ C จะคำนวณใหม่สำหรับแถวที่เหลือ แต่คุณไม่ต้องการมันอีกต่อไป ตอนนี้คุณสามารถลบคอลัมน์ Helper ได้อย่างปลอดภัย:
ด้วยเหตุนี้ เวิร์กชีตจึงเหลือสัปดาห์คู่เท่านั้น สัปดาห์คี่จึงหายไป!
เคล็ดลับ หากคุณต้องการย้ายทุกๆแถวอื่นไปที่อื่นแทนการลบออกทั้งหมด ก่อนอื่นให้คัดลอกแถวที่กรองแล้ววางลงในตำแหน่งใหม่ แล้วจึงลบแถวที่กรองออก
วิธีลบแถวอื่นใน Excel ด้วย VBA
หากคุณไม่ต้องการเสียเวลาไปกับงานเล็กๆ น้อยๆ เช่น การลบแถวอื่นๆ ในแผ่นงาน Excel ของคุณ มาโคร VBA ต่อไปนี้จะทำให้กระบวนการของคุณเป็นแบบอัตโนมัติ:
Sub Delete_Alternate_Rows_Excel() Dim SourceRange As Range Set SourceRange = Application.Selection Set SourceRange = Application.InputBox( "Range:" , "Select the range" , SourceRange.Address, Type :=8) ถ้า SourceRange.Rows.Count >= 2 จากนั้น Dim FirstCell As Range Dim RowIndex เป็น Integer Application.ScreenUpdating = False สำหรับ RowIndex = SourceRange.Rows.Count - (SourceRange.Rows.Count Mod 2) ถึง 1 ขั้นตอน -2 ตั้งค่า FirstCell = SourceRange.Cells (RowIndex, 1) FirstCell.EntireRow.Delete Next Application.ScreenUpdating = True End If End Subวิธีลบทุกแถวใน Excel โดยใช้มาโคร
I ใส่แมโครในเวิร์กชีตของคุณตามปกติผ่าน Visual Basic Editor:
- กด Alt + F11 เพื่อเปิดหน้าต่าง Visual Basic for Applications
- บนแถบเมนูด้านบน คลิก แทรก > โมดูล และวางมาโครด้านบนใน โมดูล
- กดปุ่ม F5 เพื่อเรียกใช้มาโคร
- กล่องโต้ตอบจะปรากฏขึ้นและแจ้งให้คุณเลือกช่วง เลือกตารางของคุณแล้วคลิกตกลง:
เสร็จแล้ว! ทุกแถวในช่วงที่เลือกจะถูกลบ:
วิธีลบทุกแถวที่ N ใน Excel
สำหรับงานนี้ เราจะขยายการกรอง เทคนิคที่เราใช้ในการลบทุกแถว ความแตกต่างอยู่ในสูตรที่ใช้การกรอง:
MOD(ROW()- m, n)ที่ไหน:
- m คือหมายเลขแถวของเซลล์แรกที่มีข้อมูลลบ 1
- n คือแถวที่ N ที่คุณต้องการลบ
สมมติว่าข้อมูลของคุณเริ่มต้นในแถวที่ 2 และคุณต้องการลบทุกแถวที่ 3 ดังนั้น ในสูตรของคุณ n เท่ากับ 3 และ m เท่ากับ 1 (แถว 2 ลบ 1):
=MOD(ROW() - 1, 3)
หากข้อมูลของเราเริ่มต้นใน แถว 3 จากนั้น m จะเท่ากับ 2 (แถว 3 ลบ 1) ไปเรื่อยๆ การแก้ไขนี้จำเป็นต้องเรียงลำดับแถวโดยเริ่มจากเลข 1
สูตรทำคือหารหมายเลขแถวสัมพัทธ์ด้วย 3 และส่งกลับเศษที่เหลือหลังจากการหาร ในกรณีของเรา จะให้ผลลัพธ์เป็นศูนย์สำหรับทุกๆ แถวที่สาม เนื่องจากทุกๆ ตัวเลขที่สามหารด้วย 3 โดยไม่เหลือเศษ (3,6,9 ฯลฯ):
และตอนนี้ คุณ ทำตามขั้นตอนที่คุ้นเคยเพื่อกรองแถว "0":
- เลือกเซลล์ใดก็ได้ในตารางของคุณและคลิกปุ่ม ตัวกรอง บน ข้อมูล
- กรองคอลัมน์ตัวช่วยเพื่อแสดงเฉพาะค่า "0"
- เลือกแถว "0" ที่มองเห็นทั้งหมด คลิกขวาและเลือก ลบแถว จากเมนูบริบท
- ถอดตัวกรองและลบคอลัมน์ Helper
ในทำนองเดียวกัน คุณสามารถลบแถวที่ 4, 5 หรือ N อื่นๆ ใน Excel ได้
เคล็ดลับ ในกรณีที่คุณต้องการลบแถวที่มีข้อมูลไม่เกี่ยวข้อง บทช่วยสอนต่อไปนี้จะมีประโยชน์: วิธีลบแถวตามค่าของเซลล์
ฉันขอขอบคุณสำหรับการอ่านและหวังว่าจะได้พบคุณในบล็อกของเราอีกในสัปดาห์หน้า .