200多个常用宏，实用类资料 001.A列等于A列减B列 SubA列等于A列减B列()Fori=1To23Cells(i,1)=Cells(i,1)-Cells(i,2)NextEndSub