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
Thank you so much Andy and Shane .
You realy helped me. I'm doing VBA code. Any advice how/where to start
taking classes doing it organized/profesionaly because right now I'm doing it
randomly to improve my office work production!
Ask a Question
Want to reply to this thread or ask your own question?
You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.