Skip to content

Instantly share code, notes, and snippets.

@logic2design
Created August 29, 2020 10:29
Show Gist options
  • Save logic2design/af58026a1db25916e5c25beb1581013a to your computer and use it in GitHub Desktop.
Save logic2design/af58026a1db25916e5c25beb1581013a to your computer and use it in GitHub Desktop.
Delete Row based on multiple criteria Change Sheet(1) to required Sheet
Sub DeleteRows()
Dim x As Long
With Sheets(1)
For x = .UsedRange.Rows.Count To 2 Step -1
If .Cells(x, 1) < 0.2 And .Cells(x, 2) > 0.3 And .Cells(x, 3) > 10 Then
.Rows(x).Delete
End If
Next
End With
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment