vbaexcel批量删除整列（ExcelVBA根据条件删除相同的行）

昨天电脑系统故障了。安装win10系统是真的麻烦。不过已经安装好了。

1：dim定义变量

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

3：后期绑定字典

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

5：重新定义数组的大小

6：遍历数组，把两列的数据复制给str

7：判断str是否在数组里面

8：把str作为字典的key，把行数赋值给字典的item。

9：把满足条件的数据赋值给数组

10：清空目标区域的数值

11：把数组赋值给目标区域。