วิธีลบเนื้อหาทั้งหมดของเซลล์ที่ปลดล็อค / ไม่มีการป้องกันใน Excel อย่างรวดเร็ว

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

ลบเนื้อหาทั้งหมดของเซลล์ที่ปลดล็อคด้วยฟังก์ชันค้นหาและแทนที่

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

ลบเนื้อหาทั้งหมดของเซลล์ที่ปลดล็อคด้วย Kutools for Excel

---

ลบเนื้อหาทั้งหมดของเซลล์ที่ปลดล็อคด้วยฟังก์ชันค้นหาและแทนที่

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

1. เปิดแผ่นงานของคุณที่คุณต้องการลบเซลล์ที่ปลดล็อคแล้วคลิก หน้าแรก > ค้นหาและเลือก > หา หรือกดทางลัด - Ctrl + F คีย์เพื่อเปิด ค้นหาและแทนที่ กล่องโต้ตอบดูภาพหน้าจอ:

2. ใน ค้นหาและแทนที่ คลิกตกลง Options ปุ่มเพื่อขยายกล่องโต้ตอบดูภาพหน้าจอ:

3. จากนั้นคลิก รูปแบบ และปุ่ม ค้นหารูปแบบ กล่องโต้ตอบจะปรากฏขึ้นจากนั้นภายใต้ การป้องกัน แท็บยกเลิกการเลือก ล็อค และ ซ่อนเร้น ดูภาพหน้าจอ:

4. คลิก OK เพื่อกลับไปที่ ค้นหาและแทนที่ กล่องโต้ตอบจากนั้นคลิก ค้นหาทั้งหมด เซลล์ที่ไม่มีการป้องกันทั้งหมดจะแสดงในกล่องรายการด้านล่างจากนั้นกด Ctrl + เพื่อเลือกทั้งหมดโปรดดูภาพหน้าจอ:

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

6. จากนั้นคุณก็ต้องกด ลบ บนแป้นพิมพ์และเนื้อหาของเซลล์ที่ปลดล็อคที่เลือกไว้จะถูกลบออกพร้อมกัน

---

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

รหัส VBA ต่อไปนี้สามารถช่วยคุณในการล้างเนื้อหาของเซลล์ที่ปลดล็อคได้โปรดทำดังนี้:

1. กด ALT + F11 คีย์เพื่อเปิด หน้าต่าง Microsoft Visual Basic for Applications

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

รหัส VBA: ลบเนื้อหาทั้งหมดของเซลล์ที่ปลดล็อค

Sub ClearUnlockedCells()
'Updateby20140724
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For Each Rng In WorkRng
    If Rng.Locked = False Then Rng.ClearContents
Next
Application.ScreenUpdating = True
End Sub

3. จากนั้นกด F5 คีย์เพื่อเรียกใช้รหัสนี้และระบุช่วงที่คุณต้องการลบเนื้อหาของเซลล์ที่ปลดล็อคในช่องที่โผล่ออกมาดูภาพหน้าจอ:

4. คลิก OKและเนื้อหาในเซลล์ช่วงที่ปลดล็อคได้ถูกล้าง

---

ลบเนื้อหาทั้งหมดของเซลล์ที่ปลดล็อคด้วย Kutools for Excel

ถ้าคุณได้ติดตั้ง Kutools สำหรับ Excelมัน เลือก Unlocked Cells คุณสมบัติสามารถช่วยให้คุณเลือกเซลล์ที่ไม่มีการป้องกันก่อนจากนั้นคุณสามารถลบได้ในครั้งเดียว

Kutools สำหรับ Excel มีเครื่องมือ Excel ที่มีประโยชน์มากกว่า 300 รายการ ทดลองใช้ฟรีโดยไม่มีข้อ จำกัด ใน 30 วัน Get it Now

หลังจากติดตั้ง Kutools for Excel แล้วโปรดทำตามขั้นตอนต่อไปนี้:

1. เลือกช่วงข้อมูลที่คุณต้องการล้างเนื้อหาของเซลล์ที่ปลดล็อค

2. คลิก Kutools > เลือกเครื่องมือ > เลือก Unlocked Cellsดูภาพหน้าจอ:

3. และเซลล์ที่ปลดล็อคทั้งหมดได้ถูกเลือกไว้ในการเลือกของคุณ

4. กด ลบ บนแป้นพิมพ์เพื่อลบเนื้อหาของเซลล์ที่เลือกทันที

หากคุณต้องการทราบข้อมูลเพิ่มเติมเกี่ยวกับคุณลักษณะนี้โปรดคลิก เลือก Unlocked Cells.

---

บทความที่เกี่ยวข้อง:

วิธีเลือกเซลล์ที่ปลดล็อคทั้งหมดใน Excel