Access - problema con el cuadro combinado; como puedo hacer

por dos tipos de condicion

descripcion_prod
codigo_prov

Solo se queda pegado en el codigo_prov

Private Sub cdoOpciones_AfterUpdate()
' Buscar el registro que coincida con el control.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[descripcion_prod] = '" & Me![cdoOpciones] & "'"
Me.Bookmark = rs.Bookmark

Set rs = Me.Recordset.Clone
rs.FindFirst "[codigo_proveedor_prod] = '" & Me![cdoOpciones] & "'"
Me.Bookmark = rs.Bookmark

End Sub

Y por que no haces solo un findfirst asi:

rs.FindFirst "[descripcion_prod] = '" & Me![cdoOpciones] & "' and [codigo_proveedor_prod] = '" & Me![cdoOpciones] & "'"

rs.FindFirst Me.Bookmark = rs.Bookmark