Access - Permitir Ediciones

   
Vista:

Permitir Ediciones

Publicado por LazGom (4 intervenciones) el 19/09/2007 13:48:24
Estimados amigos:

A ver si soy capaz de explicarme, resulta que tengo un formulario con un control de ficha de varias páginas, en cada una de las cuales hay un subformulario. Cuando abro el formulario, no están permitidas las ediciones. MI idea es que cuando pulse un botón, se permitan las ediciciones y al pulsarlo otra vez, las ediciones se denieguen, o sea, un botón que alterna la propiedad allowedits a true y false.

Para ello, tengo este código:

"Private Sub cmdEditar_Click()

If (Me.AllowEdits = True) Then
Me.AllowEdits = False
Me.Subformulario_qryAfectaA.Form.AllowEdits = False
With cmdEditar
.Caption = "Edit OFF"
.ForeColor = RGB(0, 0, 0)
.FontSize = 8
End With

Else
Me.AllowEdits = True
Me.Subformulario_qryAfectaA.Form.AllowEdits = True
With cmdEditar
.Caption = "¡¡¡Edit ON!!!"
.ForeColor = RGB(255, 0, 0)
.FontSize = 22
End With

End If

End Sub"

que como es normal (si no, no prguntaría) no funciona. No se si estoy referenciando bien los subformularios (Me.Subformulario_qryAfectaA.Form.AllowEdits ) que son varios y sólo he puesto uno para no hacer esta consulta demasiado extensa.
En fin agradecería mucho vuestra ayuda y espero haberme explicado claramente.

Un saludo.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Permitir Ediciones

Publicado por Chea (1015 intervenciones) el 19/09/2007 21:09:17
A simple vista parece que está bien, salvo por las comillas al principio y final del procedimiento.

Prueba a ponerle un punto de interrupción y sigue el código a ver qué pasa.

Saludos
José Bengoechea Ibaceta
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar