今天的实例，如下：

问题如下：

解决的思路如下：

代码运行的结果如下：

代码如下:

代码一：

代码二：

代码解析

代码一：

1：dim定义变量

2：后期绑定字典

3：获取数据源的最后一个非空单元格行号

4：把数据源的区域，赋值给数组

5：设定循环，把A列的数组，放入字典的key

6：设定目标数组，并把key的值，放入数组

6：把brr数组的第一列数据，与arr数组的第一列数据进行匹配

7：把arr匹配的数组，分别放入brr数组

8：清空原单元格的内容，并写入brr数组

代码二： （略）大家可以结合之前所讲的split函数，来理解一下。

点击关注，可以阅读更多与VBA 相关的文章

私信 VBA或 vba 可以获取文章中含VBA代码的Excle文件