MSChart简单应用

Question

MSChart
我想不同的行显示不同的颜色 怎么写方法啊

Answer 1

http://download.csdn.net/source/1483925

Answer 2

Sub Macro1()
'
' Macro1 Macro
' 宏由 微软用户 录制，时间: 2011-7-21
''
    Charts.Add
    ActiveChart.ChartType = xlColumnClustered
    ActiveChart.SetSourceData Source:=Sheets("Sheet1").Range("A1:B30"), PlotBy _
        :=xlColumns
    ActiveChart.Location Where:=xlLocationAsObject, Name:="Sheet1"
    With ActiveChart
        .HasTitle = False
        .Axes(xlCategory, xlPrimary).HasTitle = False
        .Axes(xlValue, xlPrimary).HasTitle = False
    End With
End Sub

Answer 3

MSChart1.Plot.SeriesCollection(1).DataPoints(-1).Brush.FillColor.Set 250, 0, 0
MSChart1.Plot.SeriesCollection(2).DataPoints(-1).Brush.FillColor.Set 250, 250, 0
…… 
有多少数据设置多少

Answer 4

这些我以前都试过了  现在是一列 多行MSChart1.RowCount >1 MSChart1.columnCount=1