Botón limpiar celdas y hoja protegida
A la hora de utilizar el macro con el comando que desproteja y cuando termine vuelva a proteger la hoja todo perfecto. El problema que cada vez que ejecutó yble. Doy al. Boton de limpiar, después de la limpieza las. Celdas que me limpia que las tengo desprotegidas, ya que es donde pongo los datos, me las bloquea después de hacer la limpieza, y como la hoja está bloqueada no puedo escribir .
2 Respuestas
Respuesta de Abraham Valencia
Respuesta de Dante Amor
Revisa el siguiente ejemplo para limpiar las celdas y proteger la hoja
Sub Limpieza()
' Por Dante Amor
Set celdas = Range("A2, A5, B3, C4, D5, E6")
ActiveSheet.Unprotect "abc"
celdas.Locked = False
celdas.Value = ""
ActiveSheet.Protect "abc", DrawingObjects:=True, Contents:=True, Scenarios:=True
End SubCambia en la macro "A2, A5, B3, C4, D5, E6" por las celdas que quieras limpiar
Cambia "abc" por el password de tu hoja
.
'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias
.
Avísame cualquier duda
.