• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 142
  • Last Modified:

Excel scatter graph data labels

I have produced a scatter graph using a macro set up spreadsheet I found on the internet. The problem I have is it labels each point and I have over 200 hundred points so all the names lie on top of each other. I was hoping there would be a way to hover over and then the name appears?
0
katewillwin
Asked:
katewillwin
1 Solution
 
Glenn RayExcel VBA DeveloperCommented:
It's probably just a matter of removing the argument/statement that includes the data labels.

If you'll post the code, I'm sure we can help locate and resolve this.

-Glenn
0
 
Brian MatisProduct ManagerCommented:
Not quite sure what labels you're referring to. Axis labels? Labels on the points themselves? In either case, try clicking on one of the labels and hitting the delete key.
0
 
ProfessorJimJamCommented:
@ KATE

you have two options.

A)  i have attached an example code in a chart object.  see attached file.


B)  you can use the  add-in developed by Tushar Meta  Add-in Called  Chart hover label.  it exactly does what you have described.  
you can download add-in from the link below.  i believe the add-in is for free
http://www.tushar-mehta.com/excel/software/chart_hover_label/
EE.xlsb
0
Take Control of Web Hosting For Your Clients

As a web developer or IT admin, successfully managing multiple client accounts can be challenging. In this webinar we will look at the tools provided by Media Temple and Plesk to make managing your clients’ hosting easier.

 
katewillwinAuthor Commented:
Thanks for the responses.  The macro I downloaded creates the names but as there are so many plots the names lie on top of each other.  I can not get the names to only show when you hover over them.  If you hover over them it only shows the coordinates.

I have attached to hopefully male it clearer.
example-chart.xlsx
0
 
ProfessorJimJamCommented:
Kate,

can you check this attachment?
example-chart.xlsm
0
 
katewillwinAuthor Commented:
That's amazing, how did you do that?
0
 
ProfessorJimJamCommented:
I just wrote the below into the chart object vba   and it does the magic :-)


Private Sub Chart_MouseMove(ByVal Button As Long, ByVal Shift As Long, ByVal x As Long, ByVal y As Long)
Dim ElementID As Long
Dim Arg1 As Long
Dim Arg2 As Long


Me.GetChartElement x, y, ElementID, Arg1, Arg2
If ElementID = 3 Then
    ActiveChart.SeriesCollection(Arg1).Points(Arg2).ApplyDataLabels
    ActiveChart.SeriesCollection(Arg1).Points(Arg2).DataLabel.Font.Size = 14
    Z = 0
    For N = 11 To Sheets("Sheet1").Cells(Sheets("Sheet1").Rows.Count, 5).End(xlUp).Row
        If Sheets("Sheet1").Cells(N, 1).Height > 0 Then
            Z = Z + 1
            If Z = Arg2 Then Exit For
        End If
    Next N
    ActiveChart.SeriesCollection(Arg1).Points(Arg2).DataLabel.Text = Sheets("Sheet1").Cells(N, 5)
Else
    On Error Resume Next
    ActiveChart.SeriesCollection(1).DataLabels.Delete
    On Error GoTo 0
End If
End Sub

Open in new window

0
 
ProfessorJimJamCommented:
katewillwin

i have provided the solution to your question.  please close the question by accepting ID: 40408184
0
 
ProfessorJimJamCommented:
this question is answered and the answer was accepted by author (see text ID: http:#a40412763) .  however, the author has forgotten to close the question accepting it.  

I recommend closing the question by accepting the ID: http:#a40408184.
0

Featured Post

[Webinar] Improve your customer journey

A positive customer journey is important in attracting and retaining business. To improve this experience, you can use Google Maps APIs to increase checkout conversions, boost user engagement, and optimize order fulfillment. Learn how in this webinar presented by Dito.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now