In VBA?

Range("E2:E15").Cut Destination:=Range("E3:E16")
or if you want to be a bit more flexible

Dim rng As Range

    Set rng = Range("E2:E15")
    rng.Cut Destination:=rng.Offset(1)