今天講的實例如下:
問題如下:
解決的思路如下:
代碼運行的結果如下:
代碼如下:
代碼解析
1:2~3行 dim定義變量;
2:4~5行 後期綁定字典;
4:6行 獲取總表的最後一個非空單元格行號;
4:7行 定義新的數組;
5:9~11行 設定標題行;
6:13~23行 用for循環把大號價籤的商品編碼分別寫入字典,並把結果傳給brr數組(字典的key及item分別傳遞);
7:25~36行 用for循環把小號價籤的商品編碼分別寫入字典,並把結果傳給brr數組(字典的key及item分別傳遞);此處採用了兩個字典,一個字典是用來和總表的結果進行匹配,一給是用來傳遞數組給數組
8:38~47行 用字典反查詢總表的商品代碼,判斷商品代碼是否存在
9:49~52行 清空目標區域原有的數據,並寫入新的數組。
10 52~54行 清空字典及數組
PS: 代碼的源文件裡面還有兩外一個VBA代碼的思路。比這個代碼要簡潔。
私信 視頻 可以獲取54集VBA入門視頻
私信 VBA或 vba 可以獲取文章中含VBA代碼的Excle文件
閱讀更多 浮雲Excel分享 的文章