excel删除空单元格

来源：百度知道 编辑：UC知道 时间：2024/05/06 20:01:51
6个字段，后3个字段如果是空白的话，那前3个也没有意义。
需要将D\E\F列的单元格均为空白的行删掉。
求智能的简便方法。

按ALT+F11进入VBA代码窗口，插入模块
然后输入如下代码：

Sub zc()
z = Range("a65536").End(xlUp).Row
For x = z To 1 Step -1
If Cells(x, 4) = "" And Cells(x, 5) = "" And Cells(x, 6) = "" Then
Rows(x).EntireRow.Delete
End If
Next

End Sub

完成后按F5键，所有的满足条件的行被删除了。

“数据”，“筛选”，“自动筛选”在D、E、F列分别点下拉箭头选“空白”后删除筛选出的行，再在D、E、F列分别点下拉箭头选“全部”