Sub xuanzexx()

Dim i As Integer
For i = 135 To 4 Step -1
    If Cells(i, 11) = "" Then
        Rows(i).Select
        Selection.Delete Shift:=xlUp
    End If
Next i

End Sub