Hyperlink Within Workbook, Upper Left Corner

Question

I have a large workbook with lots of links within each sheet. 

I would like my hyperlinks within each sheet to adjust to keeping the new highlighted cell in the upper left corner. Currently it points to a different cell that is off the screen and just appears in the lower right corner. 

I have tried pasting the following in the ThisWorkbook area, but it's still not working. 

Private Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal Target As Hyperlink)

Application.Goto Reference:=ActiveCell, Scroll:=True

End Sub

Answer 1

Hi Samantha,

Thanks for posting the thread in community.

Welcome other community members to share the ideas and insights here about the problem.

Thanks,

Kimi