Botón para desbloquear todos los registros bloquedos.

Tengo un formulario con todos los cuadros en Propiedades > datos > Bloqueado si, para que no se pueda editar por equivocación, ¿Se puede crear un botón para desbloquear todos los cuadros?

3

3 Respuestas

685.500 pts. No responderé preguntas de usuarios que no valoren las...

Si se puede, pero...¿no te sería más sencillo hacerlo a nivel de formulario con la propiedad "Permitir ediciones": Sí/No?

33.275 pts. Con Access se puede hacer todo ....

La manera más fácil es que te crees un botón de comando y en el evento click pongas lo siguiente:

Me.TextBox1.Locked = False
Me.TextBox2.Locked = False
.
.

Eso suponiendo que no tengas 30 campos :-P

Se podría realizar un bucle para recorrer los campos del formulario y realizar la misma acción, pero no se cuál es tu nivel de VBA.

445.250 pts.

Carlos: Si que se puede. Pon un Botón que se llame por ejemplo >> BtnDesbloquea

Private Sub BtnDesbloquea_Click()
Dim Ctrl As Access.Control
For Each Ctrl In Me.Controls
        If Ctrl.ControlType = acTextBox Or Ctrl.ControlType = acComboBox Then
                Ctrl.Locked = False
        End If
Next Ctrl
End Sub

Creo que no tendrás problemas, ya que he ido escribiendo sobre la marcha. Mis saludos >> Jacinto

Añade tu respuesta

Haz clic para o
El autor de la pregunta ya no la sigue por lo que es posible que no reciba tu respuesta.

Más respuestas relacionadas