1
You can't use Rows() with a column reference. Just change your first part to the rows only. If IsEmpty(Range("A827").Value) = True Then Rows("825:925").EntireRow.Delete XlDeleteShiftDirection.xlShiftUp Else Rows("827:925").EntireRow.SpecialCells(xlBlanks).EntireRow.Delete End If Or you...