Mover automaticamente os rótulos de dados fora do gráfico circular no Excel 2013

Question

Eu tenho um gráfico de pizza no Excel, meus rótulos de dados são sobrepostos diretamente sobre cada fatia do bolo - mas quero meus rótulos fora da área do bolo (mas dentro da área geral do gráfico).

Eu posso arrastá-los individualmente, mas lembro que as versões mais antigas (2003?) tinham os rótulos como eu os queria, mas o 2013 não.

Existe uma função ou botão GUI para isso, ou um recurso VBA?

    

Answer 1

Você precisaria de código VBA e jogaria com propriedades de rótulos de dados, como; ChartObj.Chart.SeriesCollection(1).Points(2).DataLabel.Left = 50 ChartObj.Chart.SeriesCollection(1).Points(2).DataLabel.Top = 200

    

Answer 2

Eu tenho um problema semelhante (eu acho). Eu basicamente usei

position = xlLabelPositionBestFit

No entanto, outras posições estão disponíveis. Clique com o botão direito do mouse em xlLabelPositionBestFit na janela do VBA e liste propriedades / métodos para ver as opções.

Sub ResetLabels()

 ActiveSheet.ChartObjects("Chart XX").Activate
 ActiveChart.SeriesCollection(1).Select
 ActiveChart.SeriesCollection(1).DataLabels.Select
 Selection.Position = xlLabelPositionBestFit
 Selection.AutoText = True