How to code: If active cell is B1, goto H17 when enter pressed

[GregBeam]

When the active cell is B1, I want the curser to move to cell H17 when press
enter. I need the VB code to do this (or a macro)

 

[trevosef]

When the active cell is B1, I want the curser to move to cell H17 when press
enter. I need the VB code to do this (or a macro)

Hi GregBeam,

The code below should be copied to the specific sheet to work. It
will automatically move to cell H17 if the active cell is B1. Don't
have to press Enter key.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Address = "$B$2" Then
Application.Goto Range("H17")
End If
End Sub

Regards
trevosef

 

[Gary''s Student]

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Range("B1"), Target) Is Nothing Then Exit Sub
Application.EnableEvents = False
Range("H17").Select
Application.EnableEvents = True
End Sub