Reply to thread

Message: [QUOTE="Gary Keramidas, post: 3236376"] you can try to adapt this. i used a combobox named drop down 1. change to suit your worksheet. then right click the combobox and assign the 2nd macro run the first macro to clear and populate the list box. then selecting the sheet from the drown should take you to the sheet. Sub Fill_DropDown() Dim dDown As Object Set dDown = Worksheets("Sheet1").DropDowns("Drop Down 1") dDown.RemoveAllItems For i = 1 To Worksheets.Count dDown.AddItem Worksheets(i).Name Next End Sub Sub Select_Sheet() Dim dDown As Object Set dDown = Worksheets("Sheet1").DropDowns("Drop Down 1") Worksheets(dDown).Select End Sub [/QUOTE]