A2=IFERROR(INDEX(理科!A:A,SMALL(IF(理科!$A$2:$A$99=1,ROW($2:$99)),ROW(A1))),"")----限用於2007版以上
或=INDEX(理科!A:A,SMALL(IF(理科!$A$2:$A$99=1,ROW($2:$99),4^8),ROW(A1)))&""----任何版本可用
均为数组公式，右拉下拉
