จะลบช่วงทั้งหมดยกเว้นที่เลือกใน Excel ได้อย่างไร?

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

ลบช่วงทั้งหมดยกเว้นที่เลือกด้วยรหัส VBA

ลบช่วงทั้งหมดยกเว้นที่เลือกด้วย Select Range Helper ของ Kutools for Excel

ลบช่วงทั้งหมดยกเว้นที่เลือกด้วย Copy Ranges of Kutools for Excel

ลบช่วงทั้งหมดยกเว้นที่เลือกด้วยรหัส VBA

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

1. โปรดถือไฟล์ Ctrl เพื่อเลือกเซลล์ที่คุณต้องการเก็บไว้

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

3. ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างโต้ตอบคลิก สิ่งที่ใส่เข้าไป > โมดูลจากนั้นคัดลอกและวางโค้ด VBA ด้านล่างลงในไฟล์ โมดูล หน้าต่าง

รหัส VBA: ลบค่าเซลล์ทั้งหมดยกเว้นช่วงที่เลือก

Sub ClearAllExceptSelection()
'updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xAddress As String
    Dim xUpdate As Boolean
    On Error Resume Next
    xAddress = Application.ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the ranges want to keep", "Kutools for Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    xUpdate = Application.ScreenUpdating
    Application.ScreenUpdating = False
    For Each xCell In ActiveSheet.UsedRange
        If Intersect(xCell, xRg) Is Nothing Then
            xCell.Clear
        End If
    Next
    Application.ScreenUpdating = xUpdate
End Sub

4. จากนั้นกด F5 เพื่อเรียกใช้รหัสนี้และกล่องพร้อมต์จะปรากฏขึ้นเพื่อเตือนให้คุณเลือกช่วงของเซลล์ที่คุณต้องการเก็บไว้หากคุณได้เลือกช่วงในขั้นตอนที่ 1 โปรดคลิก OKหากไม่เป็นเช่นนั้นคุณสามารถเลือกเซลล์ที่คุณต้องการในกล่องพร้อมต์และป้อนเครื่องหมายจุลภาคเพื่อแยกช่วงต่างๆจากนั้นคลิก OK ปุ่มดูภาพหน้าจอ:

5. หลังจากคลิก OKค่าเซลล์อื่น ๆ ทั้งหมดถูกลบไปแล้ว แต่เพียงแค่ออกจากช่วงที่เลือกดูภาพหน้าจอ:

ลบช่วงทั้งหมดยกเว้นที่เลือกด้วย Select Range Helper ของ Kutools for Excel

ถ้าคุณได้ติดตั้ง Kutools สำหรับ Excelเดียวกันกับที่ การเลือกผกผัน คุณลักษณะของ เลือก Range Helper ยูทิลิตี้คุณสามารถย้อนกลับการเลือกได้อย่างรวดเร็วจากนั้นลบการเลือกย้อนกลับพร้อมกัน

หลังจากการติดตั้ง Kutools สำหรับ Excelโปรดดำเนินการดังนี้ :( ดาวน์โหลด Kutools for Excel ได้ฟรีทันที! )

1. เลือกช่วงของเซลล์ที่คุณต้องการเก็บไว้

2. จากนั้นคลิก Kutools > เลือก > เลือก Range Helperดูภาพหน้าจอ:

3. ใน เลือก Range Helper กล่องโต้ตอบตรวจสอบ การเลือกผกผันดูภาพหน้าจอ:

4. จากนั้นลากเมาส์เพื่อเลือกช่วงที่คุณต้องการย้อนกลับการเลือก เมื่อคุณปล่อยเมาส์เซลล์ที่เลือกจะถูกยกเลิกการเลือกและเซลล์ที่ไม่ได้เลือกจะถูกเลือกพร้อมกัน ดูภาพหน้าจอ:

5. จากนั้นปิดกล่องโต้ตอบและกด ลบ เพื่อลบการเลือกในครั้งเดียว และเก็บเฉพาะเซลล์ที่คุณต้องการเท่านั้นดูภาพหน้าจอ:

ดาวน์โหลด Kutools for Excel ได้ฟรีทันที!

ลบช่วงทั้งหมดยกเว้นที่เลือกด้วย Select Range Helper ของ Kutools for Excel

ยูทิลิตี้อื่น -ช่วงการคัดลอก of Kutools สำหรับ Excel ยังสามารถช่วยให้คุณทำงานนี้เสร็จได้คุณเพียงแค่ต้องคัดลอกช่วงที่คุณเลือกไปยังแผ่นงานใหม่จากนั้นจึงลบแผ่นงานเก่า

หลังจากการติดตั้ง Kutools สำหรับ Excelโปรดทำตามขั้นตอนต่อไปนี้ :( ดาวน์โหลด Kutools for Excel ได้ฟรีทันที! )

1. ถือ Ctrl เพื่อเลือกช่วงของเซลล์ที่คุณต้องการเก็บไว้

2. จากนั้นคลิก Kutools > ช่วงการคัดลอกดูภาพหน้าจอ:

3. และใน คัดลอกหลายช่วง กล่องโต้ตอบตรวจสอบ ทั้งหมด ภายใต้ วางแบบพิเศษตรวจสอบ รวมถึงความสูงของแถว และ รวมถึงความกว้างของคอลัมน์ หากคุณต้องการรักษาความสูงของแถวและความกว้างของคอลัมน์ที่คุณต้องการดูภาพหน้าจอ:

4. จากนั้นคลิก Ok และกล่องพร้อมต์อื่นจะปรากฏขึ้นเพื่อเตือนให้คุณเลือกเซลล์เพื่อใส่เซลล์ที่คัดลอกโปรดเลือกเซลล์ในแผ่นงานใหม่ดูภาพหน้าจอ:

5. จากนั้นคลิก OKและมีการวางเฉพาะช่วงที่คุณเลือกลงในแผ่นงานใหม่และตอนนี้คุณสามารถลบแผ่นงานต้นฉบับได้ตามที่คุณต้องการ

ดาวน์โหลด Kutools for Excel ได้ฟรีทันที!

Demo: ลบช่วงทั้งหมดยกเว้นที่เลือกด้วย Kutools for Excel

สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน

🤖	Kutools AI ผู้ช่วย: ปฏิวัติการวิเคราะห์ข้อมูลโดยยึดตาม: การดำเนินการที่ชาญฉลาด   |  สร้างรหัส  |  สร้างสูตรที่กำหนดเอง  |  วิเคราะห์ข้อมูลและสร้างแผนภูมิ  |  เรียกใช้ฟังก์ชัน Kutools...
	คุณสมบัติยอดนิยม: ค้นหา เน้น หรือระบุรายการที่ซ้ำกัน   |  ลบแถวว่าง   |  รวมคอลัมน์หรือเซลล์โดยไม่สูญเสียข้อมูล   |   รอบโดยไม่มีสูตร ...
	การค้นหาขั้นสูง: VLookup หลายเกณฑ์  |   VLookup หลายค่า  |   VLookup ข้ามหลายแผ่น   |   การค้นหาที่ไม่ชัดเจน ....
	รายการแบบเลื่อนลงขั้นสูง: สร้างรายการแบบหล่นลงอย่างรวดเร็ว   |  รายการแบบหล่นลงขึ้นอยู่กับ   |  เลือกหลายรายการแบบหล่นลง ....
	ผู้จัดการคอลัมน์: เพิ่มจำนวนคอลัมน์เฉพาะ  |  ย้ายคอลัมน์  |  สลับสถานะการมองเห็นของคอลัมน์ที่ซ่อนอยู่  |  เปรียบเทียบช่วงและคอลัมน์ ...
	คุณสมบัติเด่น: กริดโฟกัส   |  มุมมองการออกแบบ   |   บาร์สูตรใหญ่   |  สมุดงานและตัวจัดการชีต   |  ห้องสมุดทรัพยากร (ข้อความอัตโนมัติ)   |  เลือกวันที่   |  รวมแผ่นงาน   |  เข้ารหัส/ถอดรหัสเซลล์   |  ส่งอีเมลตามรายการ   |  ซุปเปอร์ฟิลเตอร์   |   ตัวกรองพิเศษ (กรองตัวหนา/ตัวเอียง/ขีดทับ...) ...
	ชุดเครื่องมือ 15 อันดับแรก:  12 ข้อความ เครื่องมือ (เพิ่มข้อความ, ลบอักขระ, ... )   |   50 + แผนภูมิ ประเภท (แผนภูมิ Gantt, ... )   |   40+ ใช้งานได้จริง สูตร (คำนวณอายุตามวันเกิด, ... )   |   19 การแทรก เครื่องมือ (ใส่ QR Code, แทรกรูปภาพจากเส้นทาง, ... )   |   12 การแปลง เครื่องมือ (ตัวเลขเป็นคำ, การแปลงสกุลเงิน, ... )   |   7 ผสานและแยก เครื่องมือ (แถวรวมขั้นสูง, แยกเซลล์, ... )   |   ... และอื่น ๆ

เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา  คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...

อ่านเพิ่มเติม ... ดาวน์โหลดฟรี...

---

แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก

• เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
• เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
• เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!

อ่านเพิ่มเติม ... ดาวน์โหลดฟรี...