Excel ofrece protección para sus hojas de trabajo, lo que significa que puede proteger el contenido de las celdas para que no se puedan modificar. En otras ediciones de ExcelTips se ha discutido exactamente cómo se usa esta protección.

¿Qué sucede si desea permitir la edición de celdas, pero desea que estén protegidas inmediatamente después de que alguien ingrese información en la celda? Por ejemplo, tiene celdas en las que un usuario puede ingresar información, pero una vez ingresada, no desea que tenga la capacidad de cambiar la información que ingresó.

No existe una capacidad inherente en Excel para proteger su entrada después de la entrada, pero puede crear la capacidad mediante el uso de una macro. La siguiente macro es un ejemplo de cómo puede hacer esto:

Private Sub Worksheet_Change(ByVal Target As Range)

Dim MyRange As Range

Set MyRange = Intersect(Range("A1:D100"), Target)

If Not MyRange Is Nothing Then         Sheets("Sheet1").Unprotect password:="hello"

MyRange.Locked = True         Sheets("Sheet1").Protect password:="hello"

End If End Sub

Esta macro asume que la hoja de trabajo ya ha sido protegida y que todas las celdas donde desea que sea posible la entrada están desbloqueadas.

Lo que hace es verificar si la entrada se realizó en el rango correcto de celdas, en este caso en algún lugar del rango de A1: D100. Si lo fue, entonces la hoja de trabajo está desprotegida, la celda en la que se acaba de ingresar la información está bloqueada y la hoja de trabajo está nuevamente protegida.

Si está utilizando este enfoque en su propio libro de trabajo, deberá modificar el rango de entrada potencial y querrá cambiar la contraseña utilizada para desproteger y proteger la hoja de trabajo.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios ExcelTips), he preparado una página especial que incluye información útil.

link: / excelribbon-ExcelTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

ExcelTips es su fuente de formación rentable en Microsoft Excel.

Este consejo (2034) se aplica a Microsoft Excel 97, 2000, 2002 y 2003. Puede encontrar una versión de este consejo para la interfaz de cinta de Excel (Excel 2007 y posteriores) aquí:

link: / excelribbon-Automatically_Protecting_After_Input [Protección automática después de la entrada].