Hi,
I have code for the SheetFollowHyperlink event in the ThisWorkbook object.
Code:
Private Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal Target As Hyperlink)
ActiveWindow.ScrollRow = ActiveCell.Row
With ActiveWindow
.DisplayHeadings = False
.DisplayGridlines = False
.DisplayWorkbookTabs = False
End With
End Sub
For some reason this works on some computers but not others. I.e., on some computers, whenever I click on a link, it correctly moves the target cell to the top of the screen (the first visible row). On other computers it displays teh target cell at the bottom of the screen (the last visible row).
Could anyone explain/help?
Thank you,
Kriti