If Cells(x, 2) = "" Then Cells(x, 2).EntireRow.Delete

I want to do some simple math on the original value of the cell. How do I say "Take the original value, subtract 700, if the value is a positive number, make this the new value. If the value is a negative number, the new value should be zero" ????