I am struggling!!! I would like to have a drop down form, linked to cell "E7" and based on the value in E7 the page would jump to a certain cell.
This drop down list has 9 options.
Here is the current code I have in the "Sheet" (not in a module) and it is not working. Nothing happens when I change the drop down form choice.
Please help - anyone!
Thank you in advance.
Erica
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Range("$E$7").Value = Target.Value
If Target.Value = 1 Then
Application.Goto Reference:="A13"
If Target.Value = 2 Then
Application.Goto Reference:="A370"
If Target.Value = 3 Then
Application.Goto Reference:="A596"
If Target.Value = 4 Then
Application.Goto Reference:="A822"
If Target.Value = 5 Then
Application.Goto Reference:="A1048"
If Target.Value = 6 Then
Application.Goto Reference:="A1274"
If Target.Value = 7 Then
Application.Goto Reference:="A1500"
If Target.Value = 8 Then
Application.Goto Reference:="A1726"
If Target.Value = 9 Then
Application.Goto Reference:="A1952"
End If
End Sub
This drop down list has 9 options.
Here is the current code I have in the "Sheet" (not in a module) and it is not working. Nothing happens when I change the drop down form choice.
Please help - anyone!
Thank you in advance.
Erica
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Range("$E$7").Value = Target.Value
If Target.Value = 1 Then
Application.Goto Reference:="A13"
If Target.Value = 2 Then
Application.Goto Reference:="A370"
If Target.Value = 3 Then
Application.Goto Reference:="A596"
If Target.Value = 4 Then
Application.Goto Reference:="A822"
If Target.Value = 5 Then
Application.Goto Reference:="A1048"
If Target.Value = 6 Then
Application.Goto Reference:="A1274"
If Target.Value = 7 Then
Application.Goto Reference:="A1500"
If Target.Value = 8 Then
Application.Goto Reference:="A1726"
If Target.Value = 9 Then
Application.Goto Reference:="A1952"
End If
End Sub