Dovrebbe essere una cosa del genere
codice:Private Sub Form_Current() If Me.txtCampo1.Value > 100 Then Me.txtCampo2.Enabled = True Else Me.txtCampo2.Enabled = False End If End Sub Private Sub txtCampo1_AfterUpdate() If Me.txtCampo1.Value > 100 Then Me.txtCampo2.Enabled = True Else Me.txtCampo2.Enabled = False End If End Sub