Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Combo boxes
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? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Combo boxes
Hi,
replace these two lines: ElseIf Worksheets("MainMenu").DropDown.Value = "Functional Manager" Then Worksheets("Functional Mgr").Range("A1").Select with: ElseIf Worksheets("MainMenu").DropDown.Value = "Functional Manager" Then Worksheets("Functional Mgr").Range("A1").Select As additional information I would recommend using a "select case" instead of all those elseif lines. Also using a dropdown menu on the toolbar would look more elegant instead of the combo boxes on each sheet. Good luck. Carlos Lozano www.caxonline.net " wrote: 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? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Getting Combo boxes to change options based on other Combo boxes. | New Users to Excel | |||
Selecting subsets using combo boxes or list boxes | Excel Discussion (Misc queries) | |||
Questions on combo boxes and list boxes. | New Users to Excel | |||
Combo Boxes and Tick Boxes | Excel Programming | |||
List boxes/combo boxes | Excel Programming |