不需要用VBA,直接用公式可以搞掂,A1输入公式:=VLOOKUP(B1&C1,IF({1,0},H$1:H$1000&I$1:I$1000,G$1:G$1000),2,)按CTRL+SHIFT+回车键下拉
搞得跟对方的非官方