Forum Discussion

LesKing's avatar
LesKing
Brass Contributor
Apr 01, 2024

Deleting Rows based on a criteria

Hi all, I have a spreadsheet with 88 rows (which will get more rows over time). The data starts at row 2 (row 1 is a header row). Column 'I' in each row shows either "Mandatory" or "Not Required". I...
Macros and VBA
HansVogelaar's avatar
HansVogelaar
MVP
Apr 01, 2024

LesKing 

Sub DeleteNotRequired()
    Application.ScreenUpdating = False
    Range("I:I").AutoFilter Field:=1, Criteria1:="Not Required"
    Range("I2:I1000").SpecialCells(Type:=xlCellTypeVisible).EntireRow.Delete
    Range("I:I").AutoFilter
    Application.ScreenUpdating = True
End Sub
  • LesKing's avatar
    LesKing
    Brass Contributor
    Apr 01, 2024
    Thank you, Hans - you've rescued me again!!
    Les King

Resources