如题引用柱状图怎么设置七颜色的呢

我的代码如下

Private Sub Command2_Click()
  Dim x
  MSChart1.chartType = VtChChartType2dBar
  MSChart1.RowCount = 50
  MSChart1.ColumnCount = 1
  For x = 1 To 50
    MSChart1.Row = x
    MSChart1.RowLabel = x
    MSChart1.Plot.SeriesCollection(1).DataPoints(-1).Brush.FillColor.Set 2, 0, 255
 Next
End Sub

但是怎么设置每一列的颜色呢