VBA实战技巧精粹017：如何快速删除空白单元格所在的行

这个问题应该可以说几乎算不上问题的，就是从后往前逐个单元格进行检查就可以，只要为空，就将该单元格所在行删掉。但今天发现一个更快速的方法，利用specialcells方法，速度更快。冲着这个执行的速度，代码的简洁值得为它单写一篇博客。

代码非常简单：

Sub 快速删除含有空白单元格的行()
    '下面代码均可以实现相同效果
    Columns(1).SpecialCells(xlCellTypeBlanks).EntireRow.Delete
    Range("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
    Columns(1).SpecialCells(4).EntireRow.Delete
End Sub
复制执行时，只需要执行其中任一行代码即可。

 用 菊子曰写博客，就是爽！

转载于:https://www.cnblogs.com/xiehui/archive/2011/04/29/2033030.html