Selecting value in my combobox

[MsLady]

I use this code to select the value in my combox (bound to a query).

But i keep getting: Runtime error 424, objects required. Any ideas?

Private Sub Form_BeforeUpdate(Cancel As Integer)
If Me!Combo71.Column(1).Value = "Completed" And (Len(Me.[Completion Date] & "") = 0) Then

    MsgBox "Please enter date of completion!", vbExclamation, "Completion Date Required"
    Me![Completion Date].BackColor = "10092543"
End If
End Sub

query on combo71 is:
SELECT statusCodes.statusCode, statusCodes.statusDescription FROM statusCodes;

Please help

 

[mcirvine]

hi

try it without the .value

Me!Combo71.Column(1).Value becomes Me!Combo71.Column(1)

Works for me without the value

 

[MsLady]

Thanks mcirvine!
works brilliantly