vikgarden, here is some code I found that might help
Using event code like this requires that the user enter something in the
cell. It doesn't matter how the user exits the cell, it will still go to the
next cell. However, if the user doesn't "change" the cell, the macro doesn't
fire, so it's not a true tab order.
Private Sub Worksheet_Change(ByVal Target As Range)
'Tab order
Dim aTabOrder As Variant
Dim i As Long
'Set the tab order of input cells
aTabOrder = Array("A1", "C1", "G3", "B5", "E1", "F4")
'Loop through the array of cell address
For i = LBound(aTabOrder) To UBound(aTabOrder)
'If the changed cell is in the array
If aTabOrder(i) = Target.Address(0, 0) Then
'If the changed cell is the last array element
If i = UBound(aTabOrder) Then
'Select the first cell in the array
Me.Range(aTabOrder(LBound(aTabOrder))).Select
Else
'Select the next cell in the array
Me.Range(aTabOrder(i + 1)).Select
End If
End If
Next i
End Sub
To put in this macro right click on the worksheet tab and view code, in the
window that opens paste this code, press Alt and Q to close this window and
go back to your workbook. If you are using excel 2000 or newer you may have
to change the macro security settings to get the macro to run. To change the
security settings go to tools, macro, security, security level and set it to
medium
To change the security settings go to tools, macro, security, security level
and set it to medium
--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003