Great - Thanks Paul & Don - that did it.
Marc
-----Original Message-----
From: MS Excel General Q & A List [mailto:EXCEL-G PEACH.EASE.LSOFT.COM]
On Behalf Of Koch, Paul (PJKO)
Sent: 23 April 2007 03:44 PM
To: EXCEL-GPEACH.EASE.LSOFT.COM
Subject: Re: Hyperlinks - Named Range to appear at top of
worksheet
Mark,
If the active cell is above your selected range, the desired
range is
displayed at the bottom of the screen. If the active cell
is below, the
desired range will be displayed at the top of the screen.
Try this:
Private Sub Worksheet_BeforedoubleClick(ByVal Target As
Range, Cancel As
Boolean)
Dim Wantedrng As String
Wantedrng = Trim(ActiveCell.Value)
If Wantedrng = "" Then Exit Sub
On Error Resume Next
If ActiveWorkbook.Names(ActiveCell.Value) Is Nothing
Then
MsgBox "Range was not found"
Else
Application.Goto Wantedrng
ActiveWindow.LargeScroll Down:=1
Application.Goto Wantedrng
End If
End Sub
-----Original Message-----
From: MS Excel General Q & A List [mailto:EXCEL-GPEACH.EASE.LSOFT.COM]
On Behalf Of Kantor Marc
Sent: Monday, April 23, 2007 6:02 AM
To: EXCEL-GPEACH.EASE.LSOFT.COM
Subject: Re: Hyperlinks - Named Range to appear at top of
worksheet
Thanks Don. I'm not sure the purpose of the last line of
code ... "
ActiveSheet.Range("a1").Value = Wantedrng".
It is placing the names
range in the cell, but it does not bring the actual named
range to the
top of the sheet.
Marc
-----Original Message-----
From: MS Excel General Q & A List [mailto:EXCEL-GPEACH.EASE.LSOFT.COM]
On Behalf Of Don Guillett
Sent: 23 April 2007 02:51 PM
To: EXCEL-GPEACH.EASE.LSOFT.COM
Subject: Re: Hyperlinks - Named Range to appear at top of
worksheet
Instead of all of those hyperlinks, try this idea from just
the typed
name of the range in a cell Right click sheet tab>view
code>insert this>
Private Sub Worksheet_BeforedoubleClick(ByVal Target As
Range, Cancel As
Boolean)
Dim Wantedrng As String
Wantedrng = Trim(ActiveCell.Value)
If Wantedrng = "" Then Exit Sub
On Error Resume Next
If ActiveWorkbook.Names(ActiveCell.Value) Is Nothing
Then
MsgBox "Range was not found"
Else
Application.Goto Wantedrng
' MsgBox Wantedrng
ActiveSheet.Range("a1").Value = Wantedrng
End If
End Sub
Don Guillett
SalesAid Software
dguillett1austin.rr.com
----- Original Message -----
From: "Kantor Marc" <marcSENIORSFINANCE.CO.ZA>
To: <EXCEL-GPEACH.EASE.LSOFT.COM>
Sent: Monday, April 23, 2007 7:01 AM
Subject: Hyperlinks - Named Range to appear at top of
worksheet
I have created a workbook with the first sheet representing
a menu,
which has hyperlinks to defined names in other sheets.
Let's say sheet 2 has 200 rows of data and one of my name
ranges is in
row 70. When I click on the hyperlink, it takes me to the
correct cell,
but the cell is the last row of the sheet. How do I make it
so that the
defined name appears at the top of the worksheet?
TIA
Marc
------------------------------------------------------------
------------
--
The EXCEL-G list is hosted on a Windows NT(TM) machine
running L-Soft
international's LISTSERV(R) software. For
subscription/signoff info
and archives, see htt
p://peach.ease.lsoft.com/archives/excel-g.html .
COPYRIGHT INFO:
http://peach.ease.lsoft.com/scripts/wa
.exe?SHOWTPL=COPYRIGHT&L=EXCEL-G
------------------------------------------------------------
------------
--
The EXCEL-G list is hosted on a Windows NT(TM) machine
running L-Soft
international's LISTSERV(R) software. For
subscription/signoff info
and archives, see htt
p://peach.ease.lsoft.com/archives/excel-g.html .
COPYRIGHT INFO:
http://peach.ease.lsoft.com/scripts/wa
.exe?SHOWTPL=COPYRIGHT&L=EXCEL-G
------------------------------------------------------------
------------
--
The EXCEL-G list is hosted on a Windows NT(TM) machine
running L-Soft
international's LISTSERV(R) software. For
subscription/signoff info
and archives, see htt
p://peach.ease.lsoft.com/archives/excel-g.html .
COPYRIGHT INFO:
http://peach.ease.lsoft.com/scripts/wa
.exe?SHOWTPL=COPYRIGHT&L=EXCEL-G
------------------------------------------------------------
------------
--
The EXCEL-G list is hosted on a Windows NT(TM) machine
running L-Soft
international's LISTSERV(R) software. For
subscription/signoff info
and archives, see htt
p://peach.ease.lsoft.com/archives/excel-g.html .
COPYRIGHT INFO:
http://peach.ease.lsoft.com/scripts/wa
.exe?SHOWTPL=COPYRIGHT&L=EXCEL-G
------------------------------------------------------------
--------------
The EXCEL-G list is hosted on a Windows NT(TM) machine
running L-Soft
international's LISTSERV(R) software. For
subscription/signoff info
and archives, see htt
p://peach.ease.lsoft.com/archives/excel-g.html .
COPYRIGHT INFO:
http://peach.ease.lsoft.com/scripts/wa
.exe?SHOWTPL=COPYRIGHT&L=EXCEL-G
|