I am attempting to establish a tab order in Excel and can not seam to figure out how to accomplish this task. I have reviewed some previous post about this but the code didnt seem to help. Can anyone please assist me?
Thank You,
Mike
Also this was the code I attempted to use previously
Private Sub Worksheet_Change(ByVal Target As Range)
Dim aTabOrd As Variant
Dim i As Long
'Set the tab order of input cells
aTabOrd = Array("C9", "H9", "N9", "D11", "N11", "R11", "A14", "A15", "A16", "A17", "K14", "P14", "K15", "P15", "K16", "P16", "K17", "C19", "N19", "B20", "E20")
'Loop through the array of cell address
For i = LBound(aTabOrd) To UBound(aTabOrd)
'If the cell that's changed is in the array
If aTabOrd(i) = Target.Address(0, 0) Then
'If the cell that's changed is the last in the array
If i = UBound(aTabOrd) Then
'Select first cell in the array
Me.Range(aTabOrd(LBound(aTabOrd))).Select
Else
'Select next cell in the array
Me.Range(aTabOrd(i + 1)).Select
End If
End If
Next i
End
Bookmarks