software

Is there a way to bring the hyperlinked cell to the top of the page?
Currently, when I select my hyperlinked text, it takes me to the correct
cell, but the cell is always at the bottom of the page. I need it to be at
the top of the page so the user sees it promptly.

Thank you!!
--
Tina

You might be able to use the following with the FollowHyperlink event. I'm
fairly new to Excel and visual basic programming, so you might know more
about how to do this than I do.

Sub ActiveTop()

' Move active cell to top of window

' Shortcut key: Ctrl Shift A

ActiveWindow.ScrollRow = ActiveCell.Row

End Sub

Good luck,
Patricia Shannon

quot;Tinaquot; wrote:

gt; Is there a way to bring the hyperlinked cell to the top of the page?
gt; Currently, when I select my hyperlinked text, it takes me to the correct
gt; cell, but the cell is always at the bottom of the page. I need it to be at
gt; the top of the page so the user sees it promptly.
gt;
gt; Thank you!!
gt; --
gt; Tina

Actually, I'm a newbie to VB too. Where would I find the FollowHyperlink
event and how/where would I enter this code?
--
Tinaquot;Patricia Shannonquot; wrote:

gt; You might be able to use the following with the FollowHyperlink event. I'm
gt; fairly new to Excel and visual basic programming, so you might know more
gt; about how to do this than I do.
gt;
gt; Sub ActiveTop()
gt;
gt; ' Move active cell to top of window
gt;
gt; ' Shortcut key: Ctrl Shift A
gt;
gt; ActiveWindow.ScrollRow = ActiveCell.Row
gt;
gt; End Sub
gt;
gt; Good luck,
gt; Patricia Shannon
gt;
gt; quot;Tinaquot; wrote:
gt;
gt; gt; Is there a way to bring the hyperlinked cell to the top of the page?
gt; gt; Currently, when I select my hyperlinked text, it takes me to the correct
gt; gt; cell, but the cell is always at the bottom of the page. I need it to be at
gt; gt; the top of the page so the user sees it promptly.
gt; gt;
gt; gt; Thank you!!
gt; gt; --
gt; gt; Tina

I need to know how much detail to go into.
Do you know how to create a macro?
Do you know how to use the visual basic editor?quot;Tinaquot; wrote:

gt; Actually, I'm a newbie to VB too. Where would I find the FollowHyperlink
gt; event and how/where would I enter this code?
gt; --
gt; Tina
gt;
gt;
gt; quot;Patricia Shannonquot; wrote:
gt;
gt; gt; You might be able to use the following with the FollowHyperlink event. I'm
gt; gt; fairly new to Excel and visual basic programming, so you might know more
gt; gt; about how to do this than I do.
gt; gt;
gt; gt; Sub ActiveTop()
gt; gt;
gt; gt; ' Move active cell to top of window
gt; gt;
gt; gt; ' Shortcut key: Ctrl Shift A
gt; gt;
gt; gt; ActiveWindow.ScrollRow = ActiveCell.Row
gt; gt;
gt; gt; End Sub
gt; gt;
gt; gt; Good luck,
gt; gt; Patricia Shannon
gt; gt;
gt; gt; quot;Tinaquot; wrote:
gt; gt;
gt; gt; gt; Is there a way to bring the hyperlinked cell to the top of the page?
gt; gt; gt; Currently, when I select my hyperlinked text, it takes me to the correct
gt; gt; gt; cell, but the cell is always at the bottom of the page. I need it to be at
gt; gt; gt; the top of the page so the user sees it promptly.
gt; gt; gt;
gt; gt; gt; Thank you!!
gt; gt; gt; --
gt; gt; gt; Tina

I need more detail. Is the hyperlink in an Excel spreadsheet, pointing to a
different Excel spreadsheet, or what?

quot;Tinaquot; wrote:

gt; Is there a way to bring the hyperlinked cell to the top of the page?
gt; Currently, when I select my hyperlinked text, it takes me to the correct
gt; cell, but the cell is always at the bottom of the page. I need it to be at
gt; the top of the page so the user sees it promptly.
gt;
gt; Thank you!!
gt; --
gt; Tina

Thanks for your reply but I figured it out. Instead of a hyperlink, I used a
command button with 4 lines of code:

Private Sub CommandButton1_Click()
Range(quot;a50quot;).Select
ActiveWindow.ScrollRow = ActiveCell.Row
End Sub

I hope this can help someone else.

--
Tinaquot;Patricia Shannonquot; wrote:

gt; I need more detail. Is the hyperlink in an Excel spreadsheet, pointing to a
gt; different Excel spreadsheet, or what?
gt;
gt; quot;Tinaquot; wrote:
gt;
gt; gt; Is there a way to bring the hyperlinked cell to the top of the page?
gt; gt; Currently, when I select my hyperlinked text, it takes me to the correct
gt; gt; cell, but the cell is always at the bottom of the page. I need it to be at
gt; gt; the top of the page so the user sees it promptly.
gt; gt;
gt; gt; Thank you!!
gt; gt; --
gt; gt; Tina

I'm glad you figured it out. If I had known the situation, I had already
written a macro that might have helped. In fact I just wrote it within the
last week. It puts the row containing the active cell at the top of the
screen. I have it on a toolbar button and assigned to Ctrl t.

Sub ActiveTop()

' Move active cell to top of window
' Shortcut key: Ctrl t

ActiveWindow.ScrollRow = ActiveCell.Row

End Sub

quot;Tinaquot; wrote:

gt; Thanks for your reply but I figured it out. Instead of a hyperlink, I used a
gt; command button with 4 lines of code:
gt;
gt; Private Sub CommandButton1_Click()
gt; Range(quot;a50quot;).Select
gt; ActiveWindow.ScrollRow = ActiveCell.Row
gt; End Sub
gt;
gt; I hope this can help someone else.
gt;
gt; --
gt; Tina
gt;
gt;
gt; quot;Patricia Shannonquot; wrote:
gt;
gt; gt; I need more detail. Is the hyperlink in an Excel spreadsheet, pointing to a
gt; gt; different Excel spreadsheet, or what?
gt; gt;
gt; gt; quot;Tinaquot; wrote:
gt; gt;
gt; gt; gt; Is there a way to bring the hyperlinked cell to the top of the page?
gt; gt; gt; Currently, when I select my hyperlinked text, it takes me to the correct
gt; gt; gt; cell, but the cell is always at the bottom of the page. I need it to be at
gt; gt; gt; the top of the page so the user sees it promptly.
gt; gt; gt;
gt; gt; gt; Thank you!!
gt; gt; gt; --
gt; gt; gt; Tina

p.s., I realize that you have this code as part of your macro, but I thought
it might be of some help to people just beginning to use Excel VBA.

quot;Patricia Shannonquot; wrote:

gt; I'm glad you figured it out. If I had known the situation, I had already
gt; written a macro that might have helped. In fact I just wrote it within the
gt; last week. It puts the row containing the active cell at the top of the
gt; screen. I have it on a toolbar button and assigned to Ctrl t.
gt;
gt; Sub ActiveTop()
gt;
gt; ' Move active cell to top of window
gt; ' Shortcut key: Ctrl t
gt;
gt; ActiveWindow.ScrollRow = ActiveCell.Row
gt;
gt; End Sub
gt;
gt; quot;Tinaquot; wrote:
gt;
gt; gt; Thanks for your reply but I figured it out. Instead of a hyperlink, I used a
gt; gt; command button with 4 lines of code:
gt; gt;
gt; gt; Private Sub CommandButton1_Click()
gt; gt; Range(quot;a50quot;).Select
gt; gt; ActiveWindow.ScrollRow = ActiveCell.Row
gt; gt; End Sub
gt; gt;
gt; gt; I hope this can help someone else.
gt; gt;
gt; gt; --
gt; gt; Tina
gt; gt;
gt; gt;
gt; gt; quot;Patricia Shannonquot; wrote:
gt; gt;
gt; gt; gt; I need more detail. Is the hyperlink in an Excel spreadsheet, pointing to a
gt; gt; gt; different Excel spreadsheet, or what?
gt; gt; gt;
gt; gt; gt; quot;Tinaquot; wrote:
gt; gt; gt;
gt; gt; gt; gt; Is there a way to bring the hyperlinked cell to the top of the page?
gt; gt; gt; gt; Currently, when I select my hyperlinked text, it takes me to the correct
gt; gt; gt; gt; cell, but the cell is always at the bottom of the page. I need it to be at
gt; gt; gt; gt; the top of the page so the user sees it promptly.
gt; gt; gt; gt;
gt; gt; gt; gt; Thank you!!
gt; gt; gt; gt; --
gt; gt; gt; gt; Tina