假设要在B表的D列罗列出财务部人员,则D2=IF(ROW($A1)<=COUNTIF(A表!$A:$A,"财务部"),INDEX(A表!$B:$B,SMALL(IF(A表!$A$1:$A$100="财务部",ROW($A$1:$A$100),4^8),ROW($A1))),""),该公式为数组公式。然后向下填充公式。
http://zhidao.baidu.com/link?url=lN9bKncPkgBdfCLsrm8vIrI6K1U1rndnrbNCTJ5vBACuV-8ScS8H0zy623JkqLvPFdM-6XOQLdOmn69RycKatUIYt8Jf-AxhKfsgomi-tL_
已经有人问过了, 请您参考上面的地址
VBA就很容易实现了