View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.charting
Andy Pope Andy Pope is offline
external usenet poster
 
Posts: 2,489
Default Click on labels to hyperlink?

Hi,

You can not apply hyperlinks to the data labels but with some VBA you
can hook into the chart events and mimic a hyperlink.

create a chart and right click the sheet tab. Pick View code and then
post the following.

Private Sub Chart_Select(ByVal ElementID As Long, _
ByVal Arg1 As Long, ByVal Arg2 As Long)

If ElementID = xlDataLabel Then
If Arg1 = 1 Then
If Arg2 = 2 Then
' selected 2 datalabel of series 1
ActiveWorkbook.FollowHyperlink "http:\\" _
& ActiveChart.SeriesCollection(Arg1).DataLabels(Arg2 ).Text
End If
End If
End If

End Sub

You can find more information on chart events here
http://www.computorcompanion.com/LPMArticle.asp?ID=221

To add a text box select the chart and just type something. It will
automatically add a textbox. You can then add a hyperlink to that.

Cheers
Andy

Dan Tabla wrote:
Thanks to this forum I learned how to add labels to my charts but I don' t
know how to attach Hyperlinks to my labels!!!


--

Andy Pope, Microsoft MVP - Excel
http://www.andypope.info