MoveAfterReturn command fails in Worksheet module

[Guest]

I am using Windows XP with Office 2003.
I have the following programs in a sheet module:

Private Sub Worksheet_Activate()
Application.MoveAfterReturn = False
End Sub
Private Sub Worksheet_Deactivate()
Application.MoveAfterReturn = True
End Sub

But, when the sheet is activated, the cell pointer still moves after enter.
How can I get this to work?

Thanks in advance for your assistance.

 

[Guest]

Please see my later post, I discovered that this is only an issue when sheet
protection is on, but I still want it to function...please see my later post
and ignore this one. Thanks.