F2=INDEX(B:B,SMALL(IF($A$2:$A$100=E2,ROW($A$2:$A$100),65536),COUNTIF($E$2:E2,E2)))数组公式同时按CTRL SHIFT 回车键，执行结果然后下拉公式
你这儿关键字不是唯一，只有写VBA才能达到你要的效果
