424 error object required.

Hi guys,
I am working on a hw/project. It was working fine. after a while it started giving me 424 error. I cant figure out how to fix it. I followed steps on other website didnt help. I was hoping someone can help me with the code. When I press debug it highlights the following:
Private Sub Form_Current()
<font style ="backgorund-color: yellow;"> btnOpenSalesRep.Enabled = False </font>
btnOpenBaker.Enabled = False
If cboEmpType.Value = "B" Then
btnOpenBaker.Enabled = True
End If
If cboEmpType.Value = "S" Then
btnOpenSalesRep.Enabled = True
End If

End Sub