Hyperlink to and from a Chart

  • Thread starter Thread starter OM
  • Start date Start date
O

OM

I have a data page, with lots (20) of tables on it. I have a graph for each
table, on their own pages. I would like to have a hyperlink (or something
similar) so that at the bottom of each table, I could have "Click here to go
to Graph 1", and then jump to the correct graph. On the graph page, I would
like a button enabling me to return to the data page.
Hyperlinks (in reading the Help file) need an address to jump to, but what
is the address of a Graph ? I can't use the Name Box to give it a defined
name, and am stuck. Any suggestions please.

Thanks,

Rob Lepper
 
Hello there;

A graph is put on an worksheet isn't it ?
So, doesn't is help to let the hyperlink refer to Cell "A1" on that
worksheet ??

I've done that several times and it suits me well.
Or isn't that what you want ?

Mark.

More Excel ? www.rosenkrantz.nl or (e-mail address removed)
 
No, I've got the graphs as seperate Chart pages, not Graphs on a normal
page. In step 4 of the Chart Wizard, where it says "Place chart..." 1. As
new sheet 2. As object in, I choose 1. As a new sheet.

Rob Lepper
 
Works well thanks Debra (and Jon of course). Next question - I can't seem to
get it to work for 2 (or more) graphs in the one workbook (my knowledge of
VBA is very limited). Is this possible ? To have an "address" for each of
several graphs on one page, and jump to a different graph, depending on what
"link" is clicked ?

How do I jump back as well ?

Thanks,

Rob Lepper
 
You can change the range in the Intersect, to include more cells. For
example, with a list of charts in cells B2:B5 --
'====================
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("B2:B5")) Is Nothing Then
On Error Resume Next
Charts(Target.Value).Activate
If Err.Number <> 0 Then
MsgBox "No such chart exists.", vbCritical, _
"Chart Not Found"
End If
On Error GoTo 0
End If
End Sub
'====================

To return to the worksheet, add a button from the Forms toolbar, to the
Chart sheet. Format it to not print, and assign a macro that selects the
worksheet. For example:
'==================
Sub Button1_Click()
Worksheets("Sheet1").Select
End Sub
'======================
 
Thank you VERY much Debra. Now to go and pretend I'm very clever with my
graphs !

Rob Lepper
 
Back
Top