Hi - I want to hyperlink within the same Excel sheet. When I do, the
destination cell appears at the bottom of the screen. How do I get it to
appear at the top?
Thanks.

-- John

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
With ActiveWindow
.ScrollRow = ActiveCell.Row
.ScrollColumn = ActiveCell.Column
End With
End Sub

This is sheet event code. Right-click on the sheet tab and "View Code".

Copy/paste the code into that module.

A click on the hyperlink will bring the destination cell to top left of
sheet.


Gord Dibben MS Excel MVP


On Sun, 25 Oct 2009 11:55:01 -0700, John
wrote:

Hi - I want to hyperlink within the same Excel sheet. When I do, the
destination cell appears at the bottom of the screen. How do I get it to
appear at the top?
Thanks.

-- John