dropdown menu or Jump menu

T

the dude

Hello guys,
I would like to use what is called a "jump menu" for html but in Excel.
What I would like to do is, like in html, insert a list of hyperlinked
words in a dropdown menu and when you click in the small arrow and
select one of these words you are "jumped" to the url the word is
associated(it could be a http or a cell in a nother sheet).
Any ideas how to do that??
Thanks in advance
Tom
 
D

davesexcel

Add a module to your project and copy the following macro code into it.

Put the hyperlinks into the Drop Down's List Range and assign the macro

to the Drop Down. When you select a item in the Drop Down, the
hyperlink will be activated.


Sub GoToHyperlink()


Dim DropDownName
Dim LinkName


On Error GoTo NoLink


DropDownName = Application.Caller


With ActiveSheet.Shapes(DropDownName).ControlFormat
LinkName = .List(.ListIndex)
End With


ActiveSheet.Hyperlinks(LinkName).Follow


Exit Sub


NoLink:
MsgBox "Hyperlink " & LinkName & " not found.", vbExclamation


End Sub


I would use the combo box from the forms toolbar, right click on it to
assign the the macro, and also right click on it to go to format
control and assign the list range to it
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top