Hi, I can't seem to figure this one out. I think I'm close, but it just seems to keep deleting each row and will not exit the loop if the first condition is false. Thanks!
Code:
With ActiveSheet
.Select
ViewMode = ActiveWindow.View
ActiveWindow.View = xlNormalView
.DisplayPageBreaks = False
Firstrow = .UsedRange.Cells(1).Row
Lastrow = .UsedRange.Rows(.UsedRange.Rows.Count).Row
For Lrow = Lastrow To Firstrow Step -1
With .Cells(Lrow, "C")
If Not IsError(.Value) Then
If .Value = "L" & ActiveCell.Offset(0, 1).Select = 0 Then .EntireRow.Delete
Else: End If
End With
Next Lrow
End With