☰

根据行单元格中的返回值删除 Excel 中的行

tag-icon • tag-icon microsoft-excel worksheet-function
根据行单元格中的返回值删除 Excel 中的行

我在 Excel 中有一个工作表，其中 B 列中某些行的值已返回为零 (0)，但单元格中仍有公式。我希望能够使用宏删除这些行。

答案1

作为一名软件导师，我很惊讶你还不知道如何做到这一点（或者这个问题只是一个测试？）但是，以下代码可能会有所帮助：

Sub Macro1()
    Columns("B:B").Select
    Selection.AutoFilter
    ActiveSheet.Range("B:B").AutoFilter Field:=1, Criteria1:="0"
    Selection.SpecialCells(xlCellTypeVisible).Delete Shift:=xlUp
    ActiveSheet.Range("B:B").AutoFilter Field:=1
    Selection.AutoFilter
    Range("B1").Select
End Sub

但我建议（i）您打开宏记录器并为自己创建宏，并且（ii）对任何不是您自己创建的宏要格外小心 - 特别是其中包含“删除”的宏！

请注意，这会删除，Row1所以最好先在顶部插入一行 - 还会删除“0”不是从公式中得出的行。

相关内容