Series.GeoProjectionType (Word) ActiveDocument.Background.Chart.FullSeriesCollection(1).GeoProjectionType = xlGeoProjectionTypeAlbers