How to refresh form for conditionally enabling a field?

[lrmcmor]

I have seen similar threads to what I am trying to do, but nothing exact. I am trying to enable one field based on the value from a combo box. I can get the logic to work, but only if the record is saved or if I hit the Refresh All button on the ribbon bar. My situation is that the data is not yet saved to the database.



My details are:

ItemFrom = Name of Combo box
LitType = Name of field to be conditionally enabled based on value from ItemFrom
Litigation = value from ItemFrom combo box for conditional enabling to be activated

I have the following EventProcedure set at the form level

On Current
Private Sub Form_Current()
If Me.ItemFrom = "Litigation" Then
Me.LitType.Enabled = True
Else
Me.LitType.Enabled = False
End If
End Sub

Again, I can get the action I want IF I press RefreshAll. I have tried to set a me.refresh in other event procedures for both the ItemFrom and LitType fields...but I cannot get the refresh I want.
PLEASE HELP!!!!!

[Bob Fitz]

Try the code you have in the After Update event of the combo box as well.

[lrmcmor]

It does not refresh the form or the field I am targeting for the enable. I still have to press RefreshAll

[Bob Fitz]

Are you sure that you have the code in the On Current event of the form and in the After Update event of the combo box?
Have you checked that the code does actually run?

[lrmcmor]

on my Form.Property_Items for the field Item_From I have Event Procedure on After Update as the following:
Private Sub Item_From_AfterUpdate()
Me.Refresh
End Sub

On the form itself I have Event Procedure on On Current as:



Private Sub Form_Current()
If Me.Item_From = "Litigation" Then
Me.LitigationType.Enabled = True
Else
Me.LitigationType.Enabled = False
End If

End Sub

You may notice that my thread has slightly different fields names - I similified the verbiage in my thread.

[Bob Fitz]

Use:
Private Sub Item_From_AfterUpdate()
If Me.Item_From = "Litigation" Then
Me.LitigationType.Enabled = True
Else
Me.LitigationType.Enabled = False
End If

End Sub