getMsoChartType: Get the ChartType of a msoChart object
In madlogos/asesmso: ASES Analytic Toolkit on MS Office

Description Usage Arguments Value Author(s) Examples

If the msoChart is a pie chart, then this function will tell its formal chart type:
xlPie
5

1
2
3

getMsoChartType(oChart)

get_msochart_type(oChart)

oChart

msoChart object (COMIDispatch class)

If the ChartType is valid, then a named numeric is returned. If no valid ChartType can be found, returns NULL.

Yiying Wang, wangy@aetna.com

## Not run: 
ppt <- RDCOMClient::COMCreate("Powerpoint.Application")
pres <- ppt$Presentations()$Open(<some ppt file>)
slide <- pres$Slides(2)  # the 2nd slide
shape <- slide$Shapes(3)  # the 3rd shape
if (shape[['HasChart']] == -1) {  # if the shape contains msoChart
    chart <- shape[['Chart']]
    getMsoChartType(chart)
}
## End(Not run)