Question

In Excel VBA... I scan a code and it goes to cell A4. After it scans, It moves down to A5. I need a VBA code to always move it back up to A4 after the data has been entered. This scanning process happens repeatedly so i think there needs to be a loop after each time something is entered in A4.

Answer 1

I am doing it for 1 time you can just call the function in a loop if you wish

Private Sub Worksheet_Change(ByVal Target As Range)
    On Error GoTo Whoa

    Application.EnableEvents = False

    If Not Target.Cells.CountLarge > 1 Then
        If Not Intersect(Target, Columns(1)) Is Nothing Then
            Target.Offset(4).Select
    End If
Letscontinue:
    Application.EnableEvents = True
    Exit Sub
Whoa:
    MsgBox Err.Description
    Resume Letscontinue
End Sub

PS: If you want more information, you can check this also