Excel VisualBasic Script

Sub offset()
    ActiveCell.Offset(RowOffset:=-2, ColumnOffset:=4).Activate
End Sub