Hello, I have the following code, to delete blank rows in a worksheet, from
imported data.

'Deletes blank lines, for advance filterring
[a1:a50000].SpecialCells(xlCellTypeBlanks).EntireRow.Delete

Instead of using the above code, is there a way to delete non-blank rows in
the same range, which meet a certain criteria? For instance, delete all the
rows within range a1:a50000, if the value of a row contains the text "Sub
Total"?

I need to keep the range large, but am trying to expedite the process.

Any and All help Is Appreciated - Thank You