Advance to New Cell After Previous Entry

[Phil Hageman]

Posting expenses in two ranges: V5:Y54 and AB5:AB53.

For range V5:Y54 - when a value is entered in cell Y5 (the last cell in the row), I need the cursor/active cell to move to V6 (the start of the next row down in the range). Likewise, when a value is entered in Y6 I need the cursor to move to cell V7. This repeats until a value is posted in Y53, where the cursor moves to cell V54.

For range AB5:AEY53 - when a value is entered in cell AE5 (the last cell in the row), I need the cursor/active cell to move to AB6 (the start of the next row down in the range). Likewise, when a value is entered in AE6 I need the cursor to move to cell AB7. This repeats until a value is posted in AE53, where the cursor moves to cell AB54.

How can this be accomplished? Macro?

 

[ParamRay]

.
.

Try the following event-handler procedure, which should be placed in the code module corresponding to that particular worksheet:

Private Sub Worksheet_Change(ByVal Target As Range)

    With Target
        If .Row >= 5 And .Row <= 54 Then
            Select Case .Column
                Case Is = 22, 23, 24, 28, 29, 30: .Offset(0, 1).Select
                Case Is = 25, 31: .Offset(1, -3).Select
            End Select
        End If
    End With

End Sub

 

[Phil Hageman]

Gpeacock,

Works exactly as needed - thanks for your time creating this solution. Apologize for the typos in my first post - ranges are V5:Y54 and AB5:AE54.

R/Phil