亲,为何指定要用VBA?能用公式解决就尽量不要用VBA:找一个空白列,例如G列,G2粘贴这个公式并下拉:=INDEX(K:K,MATCH(L:L,F1,0))然后,复制G列,在F列选择性粘贴为数值即可。