You can design an event procedure to activate E2 anytime you try to go from D8 to D9 - stick the below into your worksheet module:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Static mybool As Boolean
If Target.Address = Range("D8").Address Then
mybool = True
Exit Sub
End If
If mybool = True And Target.Address = Range("D9").Address Then
Range("E2").Activate
End If
mybool = False
End Sub
@ Rupedaddy - have you been able to work this out? if not you most likely stuck the above code in the wrong place, and this suggests you may not be familiar with object code modules so let me try to explain better.
Do you see the Project explorer Window? resembles this http://www.excel-vba.com/zi-vbe-project-add-sheet.jpg and should be displayed by default in the left upper end corner of the VBE Window. If so just try and find your way through the tree structure it displays, should be pretty intuitive:
- find the VBAProject that relates to your workbook of interest
- below it, explore the "Microsoft Excel Objects" node
- double-click the subnode relating to your worksheet there. This will open your worksheet object code module in the main code window
Then just stick the above code there - and you should be on your way. This is a requirement for event procedures to be entered in the code module of the object they should be associated with.
Hope this helps
Edit: for this to work for all worksheets, stick the below code in your Workbook object code module
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Static ws As Worksheet
If Target.Address = Range("D8").Address Then
Set ws = Sh
Exit Sub
End If
If ws Is Sh Then
Set ws = Nothing
If Target.Address = Range("D9").Address Then
Range("E2").Activate
End If
End If
End Sub