基于VBA中的两个系列和两个轴的图表(Excel)

时间:2011-06-05 19:20:35

标签: excel excel-vba excel-2007 excel-2010 vba

我想使用VB在Excel中生成图表。图表需要有两个系列。其中一个应显示为值,另一个用作x轴。我怎样才能做到这一点?另外,如何为系列设置标签?

以下是我在图表上绘制一组值的代码:

ActiveChart.ChartType = xlXYScatterLines
'this sis displayed as y axis (values)
ActiveChart.SeriesCollection.Add Source:=Worksheets("My label").Range("H8:H11") 

非常感谢

1 个答案:

答案 0 :(得分:1)

试一试......

Sub AddNewSeries()
    With ActiveChart.SeriesCollection.NewSeries
        .Name = '//Name of Series Goes Here//
        .Values = Worksheets("My Label").Range("H8:H11")
        '// change with range of intended x-axis values
        .XValues = Worksheets("My Label").Range("A8:A11")
        .HasDataLabels = True 
    End With
End Sub

了解详情:Quick Excel Chart VBA Examples