Data Labels - Intervals

[LizCane]

Hi,

I know you can amend the intervals on the the X-Axis of a chart, do you know if there is a way to change the intervals on the data labels on the chart? So rather than showing up at every data point, it only shows up at every 6 interval units for example?

Thanks in advance,
LC

 

[oldbrewer]

do you have too many points on your chart ?

 

[LizCane]

do you have too many points on your chart ?

Yes, they overlap, but in a line chart when you have multiple series, I don't want to keep deleting the data points for every series.

 

[Worf]

This can be done with VBA, would you accept such a solution?

 

[LizCane]

This can be done with VBA, would you accept such a solution?

Yes Please anything to make this task less arduous. Having to amend data labels each time a chart is created is too time consuming.

 

[oldbrewer]

put the data in as below - highlight the first series and set marker = none

then you will have the line for all the points but only markers at 13, 23, 34

12
13	13
15
8
21
23	23
25
28
32
34	34
35

<colgroup><col width="64" span="2" style="width:48pt"> </colgroup><tbody>
</tbody>

 

[Worf]

' In case you need the code...


Sub DLabels()
Dim ch As Chart, i%, s As Series
Set ch = ActiveChart
For Each s In ch.SeriesCollection                       ' all series
    s.ApplyDataLabels
    For i = 1 To s.DataLabels.Count
        If i Mod 6 <> 0 Then s.DataLabels(i).Delete
    Next
Next
End Sub

 

[LizCane]

' In case you need the code...


Sub DLabels()
Dim ch As Chart, i%, s As Series
Set ch = ActiveChart
For Each s In ch.SeriesCollection                       ' all series
    s.ApplyDataLabels
    For i = 1 To s.DataLabels.Count
        If i Mod 6 <> 0 Then s.DataLabels(i).Delete
    Next
Next
End Sub

Hi Worf, thank you so much for this, this worked. Much appreciated.
LC

 

[Worf]

You are welcome.