Help if you can!
I have an option box on a form that has worked just fine, but for some reason it stopped working. When I select one of the "options" I get the following run time error:
Run-time error ' -2147352567 (80020009)':
Field cannot be updated.
This is my code attached to the option box:
Option Compare Database
Option Explicit
Private Sub ShipStatus_AfterUpdate()
Select Case Me.ShipStatus
Case 1
Me.ODStatusID = 4
Me.OrderStatusID = 3
Case 2
Me.ODStatusID = 5 - This is where it appears to error out when I run the Debug.
Me.OrderStatusID = 4
End Select
End Sub
What am I missing? The fields have not changed on the form. They are hidden, but have not moved or changed at all. I'm stumped.
Heidi
I have an option box on a form that has worked just fine, but for some reason it stopped working. When I select one of the "options" I get the following run time error:
Run-time error ' -2147352567 (80020009)':
Field cannot be updated.
This is my code attached to the option box:
Option Compare Database
Option Explicit
Private Sub ShipStatus_AfterUpdate()
Select Case Me.ShipStatus
Case 1
Me.ODStatusID = 4
Me.OrderStatusID = 3
Case 2
Me.ODStatusID = 5 - This is where it appears to error out when I run the Debug.
Me.OrderStatusID = 4
End Select
End Sub
What am I missing? The fields have not changed on the form. They are hidden, but have not moved or changed at all. I'm stumped.
Heidi