Series.RegionLabelOption (PowerPoint)

Possible Values are xlRegionLabelOptionsBestFitOnly, xlRegionLabelOptionsNone, xlRegionLabelOptionsShowAll.
ActiveWindow.RangeFromPoint.Chart.FullSeriesCollection(1).RegionLabelOption = xlRegionLabelOptionsBestFitOnly