Plotting series names as numerical values in a scatter graph?

**Sccye** · 02-24-2011, 01:04 PM

Hi all,

So I have three columns of data;

a list of names in column one that I want to be the name of my data series

numerical value 1

numerical value 2

I want to plot numerical value 2 agianst numerical value 3, instead it plots 2 and 3 as separate series.

I appreciate the explanation above isn't too clear, so I've attached a spreadsheet that models the issue. Graph 1 is on the right, Graph 2 on the left.

Thanks in advance.

**Andy Pope** · 02-25-2011, 06:27 AM

The quickest way is with code

Sub XX()

    Dim rngData As Range
    Dim rngItem As Range
    Dim chtTemp As Chart
    
    Set rngData = Range("A2:C9")
    Set chtTemp = Sheet1.Shapes.AddChart(xlXYScatter, 50, 400, 400, 250).Chart
    
    Do While chtTemp.SeriesCollection.Count > 0
        chtTemp.SeriesCollection(1).Delete
    Loop
    
    For Each rngItem In rngData.Rows
        With chtTemp.SeriesCollection.NewSeries
            .Name = rngItem.Cells(1, 1)
            .XValues = rngItem.Cells(1, 2)
            .Values = rngItem.Cells(1, 3)
        End With
    Next
End Sub

Manually you would need to use the Select Data dialog to add and set correct references to each series requried.