Puoi usare questo evento per le variazioni sui record esistenti:

codice:
Private Sub DataGrid1_BeforeColUpdate(ByVal ColIndex As Integer, OldValue As Variant, Cancel As Integer)
'attenzione a index (parte da 0 la numerazione) se la colonna è la terza che possono variare allora imposti 2
       if ColIndex <> 2 then        
            Cancel = 1
            Exit Sub
        End If

End Sub
eventualmente se vuoi controllare gli inserimenti utilizzi l'evento:

codice:
Private Sub DataGrid1_BeforeInsert(Cancel As Integer)
    If MsgBox("Confermi inserimento?", vbQuestion + vbYesNo, "Uscita") = vbNo Then
        Cancel = 1
    Else
        ok = True
    End If
End Sub
Ciao