按Ctrl + F,输入 0,查找后,按Ctrl + A 全选。
关闭后,按Ctrl + - 来删除行。
点击下图查看动画。
假设那些多行多列的数据在A1:F100中,只要其中有一个0,那行就删除掉,可以这样,
选中A1:F100,按下CTRL+F,弹出查找对话框,查找内容后面框中输入
0
再点击选项,勾选单元格匹配,点击查找全部,下面就会出来一些单元格地址,按下CTRL+A,就把那些地址都选中了,关闭查找对话框,这里那些单元格还处于选中状态,开始,删除,行,就行了。
先按一列排序,为0的行一起删除,再近另外的列排序,为0的删除,有几列排序几次就行了
假如数据在A:E列
F2输入公式=IF(PRODUCT(A2:E2)=0,"删除","")
公式下拉复制
按F列排序
删除F列显示“删除”的行
要用到VBA 了,假如使用区域是从A1开始的,可以考虑用下面的代码
Sub 删除行()
Dim arr, r%, c%
arr = ActiveSheet.UsedRange.Value
For r = UBound(arr) To LBound(arr) Step -1
For c = 1 To UBound(arr, 2)
If arr(r, c) <> "" And arr(r, c) = 0 Then
Rows(r).Delete
Exit For
End If
Next c, r
End Sub
否则的话要稍微作下修改