Hi,

I'm trying to delete entire rows when column K has the value TRUE in it (this is a text value, not a formula result).

I'm trying the following code.

Sub deltrue()
    Dim c As Range
    Dim SrchRng
     
    Set SrchRng = Sheets("Final Import").Range("K2:K" & Sheets("Final Import").Range("A" & Rows.Count).End(xlUp).Row)
    Do
        Set c = SrchRng.Find("TRUE", LookIn:=xlValues)
        If Not c Is Nothing Then c.EntireRow.Delete
    Loop While Not c Is Nothing
End Sub
This seems to work, but EXTREMELY slowly. I can see it deleting a row every few seconds, but my spreadsheet is over 12,000 rows. Is it because of the way it is set to loop? Is there a way to edit this so that it will work faster? It may be best if it starts at the end of the sheet, since that is where most of the TRUE values will be.

Thanks!