Sub セルを下に移動する()

    ActiveCell.Offset(2, 0).Select '

End Sub