如果Excel中的某个范围内存在零值,则轻松删除所有行:
Kutools for Excel的选择特定的单元格实用程序可以帮助您轻松地选择整个行(如果在某个范围内存在零值),然后您可以手动快速快速删除所有选定行,而不会出现任何错误。如果Excel中的VBA单元格包含零,则删除行
本节将向您展示VBA方法,以删除Excel中某一列中存在零值的所有行。
1。 按Alt + F11键同时显示Microsoft Visual Basic应用程序窗口。
2.在“ Microsoft Visual Basic for Applications”窗口中,单击“插页>模块,然后将以下VBA代码复制并粘贴到模块窗口中。
VBA:如果工作表中的某些列范围内存在零值,则删除整个行
Sub DeleteZeroRow()'Updateby20140616 Dim Rng作为范围Dim WorkRng作为错误发生时的范围恢复下一个xTitleId =“ KutoolsforExcel” Set WorkRng = Application.Selection Set WorkRng = Application.InputBox(“ Range”,xTitleId,WorkRng.Address,类型:= 8 )Application.ScreenUpdating = False设置Rng = WorkRng.Find(“ 0”,LookIn:= xlValues)如果不是Rng则为空,则Rng.EntireRow.Delete结束如果循环,而没有Rng则为空
3。 按F5运行代码的关键,在弹出窗口中KutoolsforExcel对话框中,根据其中的零值选择要删除整个行的列范围,然后单击OK按钮。 看截图:
然后,将立即删除基于指定列范围内零值的所有行。