我希望根据 Excel 2007 中是否存在具有特定值的单元格来自动删除该行。我在 Google 上搜索过,但只找到了有关以前版本的 Excel 的 VBA 脚本的旧信息,而且到目前为止,这些信息都不起作用。我正在寻找有关如何执行此操作的超级用户质量解释。
答案1
此宏将删除包含具有“fri”值的单元格的行,然后将单元格上移。只需将代码中的“FRI”更改为您要搜索的值即可。您还可以修改它以提示输入值或使用另一个单元格中的值作为条件。
Sub DeleteThis()
For Each Rng In Selection.Rows
If (Application.WorksheetFunction.CountIf(Rng, "fri") > 0) Then
Rng.Delete Shift:=xlUp
End If
Next Rng
End Sub
使用方法:选择您的数据范围,然后运行宏。
样品:
之前:
后:
非 VBA:您可以使用 Excel 的高级过滤器来选择符合特定条件的行;不过,这可能需要一些工作表空间和其他一些步骤。