Right click sheet tabview codeinsert thisSAVE workbook

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 2 Or Target.Column 25 Then Exit Sub
If Target.Column = 25 Then
Target.Offset(1, -23).Select
Else
Target.Offset(, 1).Select
End If
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"SFC Traver" wrote in message
...
I have browsed around the group and didn't find anything specific to help
me
with a macro. I am weak on VBA. What I need is when a single digit value
is
entered in a cell, to have it move to the next cell. So, when a user types
in
"4" in B2, then it should move to C2.

I also need it to move to the next row once it a value is entered in Y2.
So
when a user types in "3" in Y2, it moves to B3 and repeats the code above.

Can it be done? I've done the data validation to restrict the cells, just
need specifics on how to do the macro.
Thanks!