Sub？SumSelect()
Range("A1:A "？& amp？申請。CountA(Range("a:a "))。復制？範圍(" I1 ")
範圍(" E2:E "？& amp？申請。CountA(Range("e:e "))。復制？Range("我"？& amp？申請。CountA(Range("i:i "))？+?1)
ActiveSheet。Range("I:I ")。刪除重復項？列:=1，？表頭:=xlNo
號碼？=?申請。CountA(Range("i:i "))
Range("J2:J "？& amp？號)？=?" =IFERROR(VLOOKUP(I:I，A:B，2，0)，"""")"
範圍(" K2:K "？& amp？號)？=?" =IFERROR(VLOOKUP(I:I，E:F，2，0)，"""")"
結束？潛水艇