borrar celdas desbloqueadas

Hola Amigo, Tengo un libro con 5 hojas, como modifico este macro para que me borra celda Desbloqueadas Varias hoja del mismo libro. KM**VE Sub borrarDesbloqueadas() ' ' Macro1 Macro ' Macro grabada el 27/02/2006 por KM ' ...

En una hoja bloqueada, para borrar unas celdas desplazando el resto hacia arriba con la instruccion: ws.Range(RangoDestino).Delete Shift:=xlShiftUp (ws es la hoja activa con el rango a borrar) Se detiene la ejecucion en esa línea, a pesar ...