controlling excel input move cursor right, then down

Originally Posted by TMShucks

In the worksheet module, try something like:

Option Explicit

Dim MoveRight As Boolean

Private Sub Worksheet_Change(ByVal Target As Range)

MoveRight = Not MoveRight
'Debug.Print MoveRight

If MoveRight Then
    Target.Offset(0, 1).Select
Else
    Target.Offset(1, -1).Select
End If

End Sub

Regards

I'm new to Excel and ran across this excellent solution for getting the cursor to move right and down. My question is how do you get it to work for three or four columns across, and then back to the beginning column? This presumes that each row will begin at column A.

Thanks in advance.

trc310