HI, can anyone help me, I am using this code for deleting active cell and shift up, can we write these code more short or any other way.
Sub Delete_Range_To_ShiftUP()
ActiveCell.Delete
ActiveCell.Offset(0, 1).Delete
ActiveCell.Offset(0, 2).Delete
End Sub