Dim c As Range
Dim Remove As Integer
Remove = Sheets("TEST").Range("A" & Rows.Count).End(xlUp).Row
For Each c In Sheets("TEST").Range("A1:A" & Remove)
If Len(c) <= 8 Then
c.EntireRow.Delete
End If
Next c
Hi,
I'm using the code above to delete rows that have 8 characters or...