Activating a Hyperlink W/O using the mouse

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

swatsley - 15 Apr 2005 19:07 GMT

I have a massive file which contains many sheets and i have one summary
sheet with a column of hyperlinks which reference each sheet separately.

Since i continually strive to not use my mouse, i bugs me to have to grab
the mouse solely to activate a sheet. all of my work is done in rows, can i
write a macro to move the courser to the left cell where the hyperlink is
and activate the sheet relating to the row i'm on? or does anyone know how
i can activate the Hyperlink if i move the courser there myself.

Happy Friday and thanks in advance!!

Reply to this Message

PCLIVE - 15 Apr 2005 20:48 GMT

When on the hyperlinked cell, try pressing enter.

HTH,
Paul

> I have a massive file which contains many sheets and i have one summary
> sheet with a column of hyperlinks which reference each sheet separately.
[quoted text clipped - 8 lines]
>
> Happy Friday and thanks in advance!!

Reply to this Message

PCLIVE - 15 Apr 2005 21:02 GMT

As for a macro, you could try something like:

__________________________
Sub ActivateCellinCurrentRow()
'
Range("B" & ActiveCell.Row).Select
Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True

End Sub
____________________________

I'm assuming your link in the "left cell" is always in the same column. If
so, inthe macro above "B" is the column containing the link. If there is no
link in that column when the macro is executed, you will get an error.

Good luck.
Paul

Reply to this Message

Bill Manville - 16 Apr 2005 00:31 GMT

I don't think Enter works - it doesn't for me anyway.
But Shortcut menu key+O does work

Bill Manville
MVP - Microsoft Excel, Oxford, England
No email replies please - respond to newsgroup

Reply to this Message

swatsley - 19 Apr 2005 20:42 GMT

Gosh, thank you so much!!

It took me a minute to figure out which key you were referring, but i
appreciate it! I've done a few seaches and wasn't albe to locate it.

> I don't think Enter works - it doesn't for me anyway.
> But Shortcut menu key+O does work
>
> Bill Manville
> MVP - Microsoft Excel, Oxford, England
> No email replies please - respond to newsgroup

Reply to this Message