Com impedir agregar, editar o eliminar registres en un formulari d'Access mitjantçant codi VBA

Per impedir agregar, editar o eliminar registres en un formulari d'Access podem situar el següent codi VBA en l'event "Al abrir" del formulari que estableix les propietats "Permitir agregar", "Permitir eliminación" i "Permitir ediciones" a No.

Dim frm As Form
Set frm = Me.Form
With frm
    .AllowAdditions = False
    .AllowEdits = False
    .AllowDeletions = False
End With

Per fer el contrari, és a dir, permetre agregar, editar o eliminar registres d'un formulari que té aquestes propietats bloquejades utilitzariem el codi:

Dim frm As Form
Set frm = Me.Form
With frm
    .AllowAdditions = True
    .AllowEdits = True
    .AllowDeletions = True
End With