>Per bloccare tutti i campi in una Forms utilizzo i codice
>Me.AllowEdits=False
>e per sbloccarli tutti
>Me.AllowEdits=True
Se usi "Me.AllowEdits" che è un comando della maschera
logicamente agisci sulla maschera in toto quindi su tutti i suoi controlli
Devi usare il comando "Me.NomeCampo1.Locked" che agisce sui singoli controlli
Chiaramente devi citare uno per uno i controlli che ti interessano
Private Sub Blocca_Click()
Me.NomeCampo1.Locked = True
Me.NomeCampo2.Locked = True
Me.NomeCampo3.Locked = True
End Sub
Private Sub Sblocca_Click()
Me.NomeCampo1.Locked = False
Me.NomeCampo2.Locked = False
Me.NomeCampo3.Locked = False
End Sub
Se i controlli sono tanti puoi anche pensare a un ciclo,
ma è gia un passo piu in la
.