當前位置:成語大全網 - 書法字典 - EXCEL查出A列排除B列,結果顯示在c列,怎麽辦?

EXCEL查出A列排除B列,結果顯示在c列,怎麽辦?

用函數VLOOKUP+過濾即可解決。也可以用通用vba實現。

現在比如用vba來求解。

基本思路:創建壹個字典B,將B列的數據存儲在字典B中,遍歷數據列A,如果在字典B中不存在,則追加到列C中..在遍歷結束時,C列中的數據是A-B的結果..

表格初始數據如圖:

步驟1:創建壹個宏,並按如下方式編寫代碼:

子數據排除()

將我的標註為字符串

Dim I,J為整數

Dim b作為對象

Mys = "數據排除"

Set b = CreateObject("腳本。字典》)

床單(我的)。挑選

I = 2

Do While單元格(I,2)& lt;& gt" " '把這個單子放到字典裏。

m_key = Cells(I,2)

M_ITEM = I - 1

如果b不存在(m_key ),那麽

b.添加m_key,M_ITEM

如果…就會結束

I = I + 1

‘j = 2’記錄寫入列c的數據的最新行號。

I = 2

Do While單元格(I,1)& lt;& gt" " '從B列中排除A列數據,並將其存儲在c列中。

m_key =單元格(I,1)

如果b不存在(m_key ),那麽

Cells(J,3) = m_key

J = J + 1

如果…就會結束

I = I + 1

末端接頭

運行該宏後,結果如下所示: