Code:
$=-1,-1,-1,0,-1
IIf(Ascan($,0)<0,T,F)