¿Cómo eliminar rápidamente todo el contenido de las celdas desbloqueadas / desprotegidas en Excel?
Si tiene una hoja de trabajo que contiene una parte de las celdas desbloqueadas, y ahora, le gustaría eliminar todos los contenidos de la celda desbloqueada a la vez. ¿Tiene alguna solución para afrontar esta tarea?
Elimine todo el contenido de las celdas desbloqueadas con la función Buscar y reemplazar
Elimine todo el contenido de las celdas desbloqueadas con código VBA
Elimine todo el contenido de las celdas desbloqueadas con Kutools para Excel
Elimine todo el contenido de las celdas desbloqueadas con la función Buscar y reemplazar
Para borrar todos los valores de las celdas desprotegidas, puede usar la función Buscar y reemplazar para seleccionar las celdas desbloqueadas primero y luego eliminarlas inmediatamente.
1. Abra la hoja de trabajo que desea eliminar las celdas desbloqueadas y haga clic en Inicio > Buscar y seleccionar > Encuentre o presione atajos - Ctrl + F teclas para abrir el Buscar y reemplazar diálogo, ver captura de pantalla:
2. En la Buscar y reemplazar cuadro de diálogo, haga clic en Opciones para expandir el cuadro de diálogo, vea la captura de pantalla:
3. Luego haga clic Formato botón y una Encontrar formato aparecerá el cuadro de diálogo, luego debajo Protección pestaña, desmarcar Cerrado y Oculto cajas, ver captura de pantalla:
4. Hacer clic OK para regresar al Buscar y reemplazar cuadro de diálogo, luego haga clic en Encuentra todos , todas las celdas desprotegidas se muestran en el cuadro de lista a continuación, y luego presione Ctrl + A para seleccionarlos todos, vea la captura de pantalla:
5. Y luego cierra esto Buscar y reemplazar cuadro de diálogo, todas las celdas desbloqueadas se han seleccionado en la hoja de trabajo actual, vea la captura de pantalla:
6. Entonces solo necesitas presionar Borrar en el teclado, y el contenido de la celda desbloqueada seleccionada se eliminará de inmediato.
Elimine todo el contenido de las celdas desbloqueadas con código VBA
El siguiente código VBA también puede ayudarlo a borrar el contenido de las celdas desbloqueadas, haga lo siguiente:
1. Mantenga pulsado el ALT + F11 teclas para abrir el Ventana de Microsoft Visual Basic para Aplicaciones.
2. Hacer clic recuadro > Móduloy pegue el siguiente código en el Ventana de módulo.
Código de VBA: elimine todo el contenido de las celdas desbloqueadas
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. Entonces presione F5 clave para ejecutar este código y especifique un rango en el que desea eliminar el contenido de las celdas desbloqueadas en el cuadro emergente, vea la captura de pantalla:
4. Hacer clic OK, y se borró el contenido de las celdas de rango desbloqueadas.
Elimine todo el contenido de las celdas desbloqueadas con Kutools para Excel
Si tienes instalado Kutools for Excel, su Seleccionar celdas desbloqueadas La función puede ayudarlo a seleccionar las celdas desprotegidas primero, y luego puede eliminarlas de una vez.
Kutools for Excel incluye más de 300 útiles herramientas de Excel. Prueba gratis sin límite en 30 días. Comprar ahora
Después de instalar Kutools para Excel, siga los siguientes pasos:
1. Seleccione el rango de datos que desea borrar el contenido de la celda desbloqueada.
2. Hacer clic Kutools > Seleccionar herramientas > Seleccionar celdas desbloqueadas, ver captura de pantalla:
3. Y todas las celdas desbloqueadas se han seleccionado en su selección.
4. prensa Borrar en el teclado para eliminar el contenido de la celda seleccionada inmediatamente.
Si desea obtener más información sobre esta función, haga clic en Seleccionar celdas desbloqueadas.
Artículo relacionado:
¿Cómo seleccionar todas las celdas desbloqueadas en Excel?
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!