数组法删除某一列有空值的整行
大家好,前两天在给一个朋友做一个Excel VBA小程序的时候,有这么一个需求,如下图是他的数据表:
但是远不止这么12行,一共有500000多行。现在我们可以看到E列的数学成绩中有的是空值,现在想要把这些空值所在的整行全部删掉。由于他这个需求是整个VBA工程的一部分,所以该功能也需要用VBA来解决。那么你会想到什么方法呢?一开始我想到的是用这500000行去循环,利用E列判断空值,然后找到一个空值就删除一行。但是遗憾的是,此时Excel会弹出如下图:
这个问题是因为要一行一行操作,excel有恢复前一操作的功能,导致内存大量被占用,从而出现资源不足。所以这里推荐使用数组,编写如下程序:
运行这个程序,就非常完美解决之前的资源问题了。数组方法适用与数据量大的场合,希望能帮到大家。
赞 (0)