Should be a simple one, but cant figure it out.
In Col A, if A3 = No, mouse cursor moves to F3, that fine,
In Col A, if A4 = No, mouse cursor moves to F4 and so forth
I can seem to figure out the correct code for or how to write the code correct
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address(False, False) <> "A3" Then Exit Sub Application.EnableEvents = False If Target.Value = "No" Then Range("F3").Select End If Application.EnableEvents = True End Sub
Thats what I got to make it work for one cell so far
Target is in column A, if so move to the same row in column F:
Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, Me.Range("A:A")) Is Nothing Then Exit Sub If Target.CountLarge > 1 Then Exit Sub If Target.Value = "No" Then On Error GoTo SafeExit Application.EnableEvents = False Me.Range("F" & Target.Row).Select End If SafeExit: Application.EnableEvents = True End Sub
.Select-ing doesn’t cause the change event to refire, so you only need to disable events if you have a
SelectionChange event handler you don’t want to be executed.