Moveing to Right cell instead of Down when pressed Enter

[prajul89]

Hi,

I know the setting in excel option > advanced > After pressing enter move selection

But this works for the whole Excel application.

I want this utility for only my workbook.

Is there a way to do this via macro or something.

 

[doofusboy]

This should work:

Private Sub Worksheet_Change(ByVal Target As Range)
    Target.Offset(0, 1).Select
End Sub

 

[prajul89]

I don't think that would help! What if I press {Enter} without pressing F2???
and With Selection_change event we can't know which cell it is moved from.

 

[prajul89]

I got it.

I just added:

Private Sub Workbook_Deactivate()
Application.MoveAfterReturnDirection = xlDown
end sub

Private Sub Workbook_Activate()
Application.MoveAfterReturnDirection = xlToRight
End Sub