Hi. I am trying to use the combo box feature to navigate between
sheets. In other words, I have a dropdown menu on the header of each
sheet ("Main Menu," "Goals," etc.) and am trying to work out a macro
that directs the user to whichever sheet is selected.

I have gotten this far:

Sub DropDown()

If Worksheets("MainMenu").DropDown.Value = "Main Menu" Then
Worksheets("Main Menu").Range("A1").Select
ElseIf Worksheets("MainMenu").DropDown.Value = "Goals" Then
Worksheets("Goals").Range("A1").Select
ElseIf Worksheets("MainMenu").DropDown.Value = "Development Plan" Then
Worksheets("Development Plan").Range("A1").Select
ElseIf Worksheets("MainMenu").DropDown.Value = "Mid-Year" Then
Worksheets("Mid-Year").Range("A1").Select
ElseIf Worksheets("MainMenu").DropDown.Value = "Self-Evaluation" Then
Worksheets("Self-Eval").Range("A1").Select
ElseIf Worksheets("MainMenu").DropDown.Value = "Functional Manager"
Then Worksheets("Functional Mgr").Range("A1").Select
ElseIf Worksheets("MainMenu").DropDown.Value = "Manager" Then
Worksheets("Manager").Range("A1").Select
End If

End Sub


I keep getting a compile error. What am I doing wrong?