Jim Rech's code worked fine for me (xl2003) if I had a hyperlink that was
inserted via insert|hyperlink.

And you pasted the code under the worksheet that held the hyperlinks, right?

Bill Elerding wrote:

Whoops, Jim. The way it shows on the 'Sheet 1 code' is:

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
Application.Goto ActiveCell, True
End Sub

I had tried the option presented by Mr. Cone, also, with the same result. I
guess it is a little late at night (midnight), and I'm doing something wrong
if both approaches do not work for me. Thanks again, all!

"Jim Rech" wrote:

Right click on the tab of the worksheet with the hyperlinks and pick View
Code. In the module that appears paste this code:

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
Application.Goto ActiveCell, True
End Sub

--
Jim
"Bill Elerding" wrote in message
...
I have set up hyperlinks in a table of contents that jumps to specific
categories (individual cells) on the next worksheet. I'd like to have a
macro execute automatically after the link to have that cell be situated
at
the upper left of the screen. I'm just beginning to get into macro's, and
have not been able to figure this one out, even after checking other posts
on
this site. Thanks in advance!
--
William Elerding




--

Dave Peterson