为了方便区分图表中同一系列的数据点，我们可以为不同的数据点设置不同的颜色。不同系列的数据点也可以统一设置颜色。本文将展示如何使用Spire.Presentation完成这些操作。

同一个系列中不同的数据点设置不同的颜色

//创建Presentation对象
Presentation ppt = new Presentation();

//加载PowerPoint文档
ppt.LoadFromFile("sample.pptx");

//获取图表
IChart chart = ppt.Slides[0].Shapes[0] as IChart;

//添加数据点
for (int i = 0; i < chart.Series[0].Values.Count; i++)
{
    ChartDataPoint dataPoint = new ChartDataPoint(chart.Series[0]);
    dataPoint.Index = i;
    chart.Series[0].DataPoints.Add(dataPoint);
}

//对不同数据点设置不同的颜色
chart.Series[0].DataPoints[0].Fill.FillType = FillFormatType.Solid;
chart.Series[0].DataPoints[0].Fill.SolidColor.Color = Color.Red;
chart.Series[0].DataPoints[1].Fill.FillType = FillFormatType.Solid;
chart.Series[0].DataPoints[1].Fill.SolidColor.Color = Color.Orange;
chart.Series[0].DataPoints[2].Fill.FillType = FillFormatType.Solid;
chart.Series[0].DataPoints[2].Fill.SolidColor.Color = Color.Yellow;
chart.Series[0].DataPoints[3].Fill.FillType = FillFormatType.Solid;
chart.Series[0].DataPoints[3].Fill.SolidColor.Color = Color.Purple;

////如果不需要定义颜色，可以通过以下代码自动设置不同的颜色
//chart.Series[0].IsVaryColor = true;

//保存文档
ppt.SaveToFile("result.pptx", FileFormat.Pptx2010);

'创建Presentation对象
Dim ppt As New Presentation()

'加载PowerPoint文档
ppt.LoadFromFile("sample.pptx")

'获取图表
Dim chart As IChart = TryCast(ppt.Slides(0).Shapes(0), IChart)

'添加数据点
For i As Integer = 0 To chart.Series(0).Values.Count - 1
	Dim dataPoint As New ChartDataPoint(chart.Series(0))
	dataPoint.Index = i
	chart.Series(0).DataPoints.Add(dataPoint)
Next

'对不同数据点设置不同的颜色
chart.Series(0).DataPoints(0).Fill.FillType = FillFormatType.Solid
chart.Series(0).DataPoints(0).Fill.SolidColor.Color = Color.Red
chart.Series(0).DataPoints(1).Fill.FillType = FillFormatType.Solid
chart.Series(0).DataPoints(1).Fill.SolidColor.Color = Color.Orange
chart.Series(0).DataPoints(2).Fill.FillType = FillFormatType.Solid
chart.Series(0).DataPoints(2).Fill.SolidColor.Color = Color.Yellow
chart.Series(0).DataPoints(3).Fill.FillType = FillFormatType.Solid
chart.Series(0).DataPoints(3).Fill.SolidColor.Color = Color.Purple

'如果不需要定义颜色，可以通过以下代码自动设置不同的颜色
'chart.Series[0].IsVaryColor = true;

'保存文档
ppt.SaveToFile("result.pptx", FileFormat.Pptx2010)

为系列的数据点统一设置颜色

//创建Presentation对象
Presentation ppt = new Presentation();

//加载PowerPoint文档
ppt.LoadFromFile("sample.pptx");

//获取图表
IChart chart = ppt.Slides[0].Shapes[0] as IChart;

//为系列一的数据点设置颜色
chart.Series[0].Fill.FillType = FillFormatType.Solid;
chart.Series[0].Fill.SolidColor.Color = Color.DarkGray;

//为系列二的数据点设置颜色
chart.Series[1].Fill.FillType = FillFormatType.Solid;
chart.Series[1].Fill.SolidColor.Color = Color.Gray;

//保存文档
ppt.SaveToFile("result.pptx", FileFormat.Pptx2010);

'创建Presentation对象
Dim ppt As New Presentation()

'加载PowerPoint文档
ppt.LoadFromFile("sample.pptx")

'获取图表
Dim chart As IChart = TryCast(ppt.Slides(0).Shapes(0), IChart)

'为系列一的数据点设置颜色
chart.Series(0).Fill.FillType = FillFormatType.Solid
chart.Series(0).Fill.SolidColor.Color = Color.DarkGray

'为系列二的数据点设置颜色
chart.Series(1).Fill.FillType = FillFormatType.Solid
chart.Series(1).Fill.SolidColor.Color = Color.Gray

'保存文档
ppt.SaveToFile("result.pptx", FileFormat.Pptx2010)