จะลบช่วงทั้งหมดยกเว้นที่เลือกใน 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โปรดดำเนินการดังนี้:
1. เลือกช่วงของเซลล์ที่คุณต้องการเก็บไว้
2. จากนั้นคลิก Kutools > เลือก > เลือก Range Helperดูภาพหน้าจอ:
3. ใน เลือก Range Helper กล่องโต้ตอบตรวจสอบ การเลือกผกผันดูภาพหน้าจอ:
4. จากนั้นลากเมาส์เพื่อเลือกช่วงที่คุณต้องการย้อนกลับการเลือก เมื่อคุณปล่อยเมาส์เซลล์ที่เลือกจะถูกยกเลิกการเลือกและเซลล์ที่ไม่ได้เลือกจะถูกเลือกพร้อมกัน ดูภาพหน้าจอ:
5. จากนั้นปิดกล่องโต้ตอบและกด ลบ เพื่อลบการเลือกในครั้งเดียว และเก็บเฉพาะเซลล์ที่คุณต้องการเท่านั้นดูภาพหน้าจอ:
Kutools สำหรับ Excel - เพิ่มประสิทธิภาพ Excel ด้วยเครื่องมือที่จำเป็นกว่า 300 รายการ เพลิดเพลินกับฟีเจอร์ AI ฟรีถาวร! Get It Now
ลบช่วงทั้งหมดยกเว้นที่เลือกด้วย Select Range Helper ของ Kutools for Excel
ยูทิลิตี้อื่น -ช่วงการคัดลอก of Kutools สำหรับ Excel ยังสามารถช่วยให้คุณทำงานนี้เสร็จได้คุณเพียงแค่ต้องคัดลอกช่วงที่คุณเลือกไปยังแผ่นงานใหม่จากนั้นจึงลบแผ่นงานเก่า
หลังจากการติดตั้ง Kutools สำหรับ Excelโปรดทำตามขั้นตอนต่อไปนี้:
1. ถือ Ctrl เพื่อเลือกช่วงของเซลล์ที่คุณต้องการเก็บไว้
2. จากนั้นคลิก Kutools > ช่วงการคัดลอกดูภาพหน้าจอ:
3. และใน คัดลอกหลายช่วง กล่องโต้ตอบตรวจสอบ ทั้งหมด ภายใต้ วางแบบพิเศษตรวจสอบ รวมถึงความสูงของแถว และ รวมถึงความกว้างของคอลัมน์ หากคุณต้องการรักษาความสูงของแถวและความกว้างของคอลัมน์ที่คุณต้องการดูภาพหน้าจอ:
4. จากนั้นคลิก Ok และกล่องพร้อมต์อื่นจะปรากฏขึ้นเพื่อเตือนให้คุณเลือกเซลล์เพื่อใส่เซลล์ที่คัดลอกโปรดเลือกเซลล์ในแผ่นงานใหม่ดูภาพหน้าจอ:
5. จากนั้นคลิก OKและมีการวางเฉพาะช่วงที่คุณเลือกลงในแผ่นงานใหม่และตอนนี้คุณสามารถลบแผ่นงานต้นฉบับได้ตามที่คุณต้องการ
Kutools สำหรับ Excel - เพิ่มประสิทธิภาพ Excel ด้วยเครื่องมือที่จำเป็นกว่า 300 รายการ เพลิดเพลินกับฟีเจอร์ AI ฟรีถาวร! Get It Now
Demo: ลบช่วงทั้งหมดยกเว้นที่เลือกด้วย Kutools for Excel
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!