If dcount("*","stock","[sserie] ='" & Me.[OKSERIE] & "'")>0 then 'Existe el número de serie
If dcount("*","stock","[sserie] ='" & Me.[OKSERIE] & "' AND Averiado=True")>0 then 'Existe y está averiado
msgbox "El artículo con ese número de serie existe pero está averiado"
Else
msgbox "El artículo con ese número de serie existe y no está averiado"
End if
Else
msgbox "El artículo con ese número de serie no existe"
end if