Thanks, Jim! Took me a while to work out some of 'my' bugs, especially with
the concatenation. Have a great evening.
--
William Elerding


"Jim Cone" wrote:

Or this will work with XL97, if placed in the module
behind the sheet with the hyperlinks...

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Target.Hyperlinks.Count 0 Then
ActiveWindow.ScrollColumn = ActiveCell.Column
ActiveWindow.ScrollRow = ActiveCell.Row
End If
End Sub

It also positions the sheet with the 'cell' in the top left corner.

Jim Cone
San Francisco, USA


"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