Access - Permitir Ediciones

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.

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