Macro to Adjust Screen After Selection

[legalhustler]

In a sheet called "Summary" I have some hyperlinks to various other sheets. In some instances, once I click the hyperlink it takes me to the referenced cell in the respective sheet, however the referenced cell is at the bottom of the screen (because there are other data above it) and I have to scroll my mouse down so that the reference cell is on top of the page.

Is there a macro to adjust the screen so that when I click the hyperlink it shows the referenced cell on the top of the screen instead of the bottom?

 

[Logit]

.
https://www.techonthenet.com/excel/hyperlinks/hl_view2010.php

Tested and works here !

 

[Peter_SSs]

Is there a macro to adjust the screen so that when I click the hyperlink it shows the referenced cell on the top of the screen instead of the bottom?

1. Right click the sheet name tab of the Summary sheet and choose "View Code".
2. Copy and Paste the code below into the main right hand pane that opens at step 1.
3. Close the Visual Basic window & test.

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

 

[legalhustler]

.
https://www.techonthenet.com/excel/hyperlinks/hl_view2010.php

Tested and works here !

Pretty good tip - thanks!

 

[legalhustler]

1. Right click the sheet name tab of the Summary sheet and choose "View Code".
2. Copy and Paste the code below into the main right hand pane that opens at step 1.
3. Close the Visual Basic window & test.

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

I tested your method too. When I click a hyperlink it takes me to the reference/active cell on the other sheets but it does not show the reference/active cell on top of the screen still.

 

[Logit]

.
Thanks for asking the question. I learned something new also.

Cheers

 

[Peter_SSs]

I tested your method too. When I click a hyperlink it takes me to the reference/active cell on the other sheets but it does not show the reference/active cell on top of the screen still.

1. Do you have macros enabled?

2. Did you follow the steps exactly? If the code ended up in the wrong place, it will not work. If you open the workbook again and right click the 'Summary' sheet tab name and choose 'View Code' you should immediately see the code.