當前位置:成語大全網 - 書法字典 - Vba字典查找匹配

Vba字典查找匹配

它可以用VBA實現,速度快,精度高。根據您的要求,VBA代碼如下:

選項?明確的

Sub?告訴匹配()

暗淡?我,?k,?v,?啊?

掃描Sheet1表並建立字典。

arr?=?工作表(“工作表1”)。範圍(" a1 ")。當前區域

設置?db?=?CreateObject("腳本。字典》)

為了什麽?我?=?1?去哪?欠奉

k?=?Trim(arr(i,1))

v?=?arr(我,?2)

db(k)?=?v

下壹個?我

掃描Sheet2表並填寫b列。

紙張(“紙張2”)。挑選

為了什麽?我?=?1?去哪?Sheets("sheet2 ")使用Range.Rows.Count。

k?=?修剪(單元格(即,1))

v?=?分貝(千)

細胞(我,?1)?=?v

下壹個?我

結束?潛水艇