使用VBA代码,在Excel中按照给定的条件删除整行。具体步骤如下:
打开要编辑的Excel文件,按“Alt+F11”打开Visual Basic Editor。
在Visual Basic Editor中,点击菜单栏的“插入”,选择“模块”。
在新弹出的窗口中,输入如下代码:
Sub DelRowsBasedOnCriteria() Dim i As Long Dim lastrow As Long lastrow = ActiveSheet.UsedRange.Rows.Count For i = lastrow To 1 Step -1 If CONDITION Then Rows(i).EntireRow.Delete End If Next i End Sub
Sub DelRowsBasedOnCriteria() Dim i As Long Dim lastrow As Long lastrow = ActiveSheet.UsedRange.Rows.Count For i = lastrow To 1 Step -1 If Cells(i, 2).Value >= 60 Then Rows(i).EntireRow.Delete End If Next i End Sub
在代码中修改完条件后,按F5或点击“运行”按钮运行代码。
程序将自动按照条件删除整行。
上一篇:按照条件筛选数组并更改键名
下一篇:按照条件删除重复项