如何快速删除 Excel中未锁定/未保护的单元格的所有内容？

网友投稿 300 2024-01-10

如何快速删除Excel中未锁定/未保护的单元格的所有内容？

现在，如果您有一个包含一部分未锁定单元格的工作表，则想一次删除所有未锁定单元格的内容。您是否有解决此任务的解决方案？

使用查找和替换功能删除未锁定单元格的所有内容

使用VBA代码删除解锁单元的所有内容

删除解锁单元格的所有内容 Kutools for Excel

使用查找和替换功能删除未锁定单元格的所有内容

惊人的！在 Excel 中使用高效的选项卡，如 Chrome、Firefox 和 Safari！ 每天节省50％的时间，并减少数千次鼠标单击！

要清除所有未受保护的单元格的值，可以使用“查找和替换”功能先选择未锁定的单元格，然后立即将其删除。

1。打开您要删除未锁定的单元格的工作表，然后单击首页 > 查找和选择 > 找到最适合您的地方 或按快捷键- Ctrl + F 键打开 查找和替换 对话框，请参见屏幕截图：

2。在 查找和替换 对话框，单击 附加选项 按钮以展开对话框，请参见屏幕截图：

3。然后点击格式按钮和a 查找格式 对话框将弹出，然后在保护标签，取消选中锁定和 老旧房屋 框，请参见屏幕截图：

4。点击 OK 回到了 查找和替换 对话框，然后单击 找到所有 按钮，所有不受保护的单元格都显示在下面的列表框中，然后按 按Ctrl + A 要选择所有这些，请参见屏幕截图：

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

Copy

3。然后按 F5 键以运行此代码，并在弹出的框中指定要删除解锁单元格内容的范围，请参见屏幕截图：

4。点击 OK，并且已清除未锁定范围单元格中的内容。

删除解锁单元格的所有内容 Kutools for Excel

如果你已经安装 Kutools for Excel，它的 选择解锁的单元格 功能可以帮助您首先选择不受保护的单元，然后可以立即将其删除。

Kutools for Excel 包括300多个便捷的Excel工具。 30天免费试用，不受限制。 立即获取

安装后 Kutools for Excel，请执行以下步骤：

1. 选择您要清除未锁定单元格内容的数据范围。

2。点击 Kutools > 选择工具 > 选择解锁的单元格，请参见屏幕截图：