Hi there,
I've seen various pieces of code which are aimed at deleting rows if certain text does or does not appear, e.g -
Sub RemoveRows()Dim LR As Long, i As Long
LR = Range("A" & Rows.Count).End(xlUp).Row
For i = LR To 2 Step -1
If Not Range("A" & i).Value Like "Subtotal*" Then...