Series.SeriesColorGradientStyle (Word)

ActiveDocument.Background.Chart.FullSeriesCollection(1).SeriesColorGradientStyle = xlSeriesColorGradientStyleDiverging