ok, I give up. I can't get this part to run. It fails in the
"SeriesCollection(1).ApplyDataLabels.Type=3"
saying it does not evaluate to an object.
All I want to do is to show percentage in the data labels.
what am I missing here?


WITH oBook
.ActiveChart.SeriesCollection(1).Select
.ActiveChart.SeriesCollection(1).ApplyDataLabels.Type=3
.ActiveChart.ChartTitle.SELECT
.ActiveChart.ChartTitle.AutoScaleFont = .T.
.ActiveChart.ChartTitle.FONT.NAME = "Arial"
.ActiveChart.ChartTitle.FONT.FontStyle = "Bold"
.ActiveChart.ChartTitle.FONT.SIZE = 36
ENDWITH