Series.RegionLabelOption (Word)

Os valores de retorno possíveis são xlRegionLabelOptionsBestFitOnly, xlRegionLabelOptionsNone, xlRegionLabelOptionsShowAll.

ActiveDocument.Background.Chart.FullSeriesCollection(1).RegionLabelOption = xlRegionLabelOptionsBestFitOnly