Classe ChartGroup (PowerPoint VBA)

A classe ChartGroup representa uma ou mais sequências plotadas em um gráfico com o mesmo formato.

Set

Para usar uma variável de classe ChartGroup, ela primeiro precisa ser instanciada por exemplo

Dim chrg as ChartGroup
Set chrg = ActiveWindow.RangeFromPoint.Chart.ChartGroups(Index:=1)

Os procedimentos a seguir podem ser usados ​​para definir variáveis ​​do tipo ChartGroup: ChartGroups.Item e Chart.ChartGroups

Temas

Alguns procedimentos nesta classe foram agrupados em temas e são descritos em páginas de tema separadas

Axis with its procedures AxisGroup, HasRadarAxisLabels e RadarAxisLabels
Value with its procedures BinsCountValue, BinsOverflowValue, BinsUnderflowValue, BinWidthValue e SplitValue
Enable with its procedures BinsOverflowEnabled e BinsUnderflowEnabled

Propriedades

BinsType Especifica como o eixo horizontal do gráfico de histograma é formatado, por tipo de compartimento. Enumeração XlBinsType de leitura/gravação PowerPoint.

ActiveWindow.RangeFromPoint.Chart.ChartGroups(1).BinsType = xlBinsTypeAutomatic

BubbleScale Retorna ou define o fator de dimensionamento para balões no grupo de gráficos especificado. Long de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).BubbleScale = 200

DoughnutHoleSize Retorna ou define o tamanho do orifício em um grupo de gráficos de rosca. Long de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).DoughnutHoleSize = 10

DownBars Retorna as barras inferiores em um gráfico de linhas. DownBars somente leitura.

Dim dbsDownBars As DownBars
Set dbsDownBars = ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).DownBars

DropLines Retorna as linhas de projeção de uma série em um gráfico de linhas ou gráfico de área. Somente leitura DropLines.

Dim dlsDropLines As DropLines
Set dlsDropLines = ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).DropLines

FirstSliceAngle Retorna ou define o ângulo, em graus no sentido horário a partir da vertical, da primeira fatia do gráfico de pizza ou de rosca. Long de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).FirstSliceAngle = 12

GapWidth Para barra e coluna charts, retorna ou define o espaço, como um percentual da barra ou a largura da coluna, entre barra ou coluna clusters. Para gráficos de pizza de pizza e barra de pizza, retorna ou define o espaço entre as seções principais e secundárias do gráfico. Long de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).GapWidth = 30

HasDropLines True se o gráfico de linhas ou gráfico de área tem linhas de projeção. Boolean de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).HasDropLines = True

HasHiLoLines True se o gráfico de linhas tiver linhas de máximo/mínimo. Boolean de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).HasHiLoLines = True

HasSeriesLines True se um gráfico de barras ou de gráfico de colunas empilhadas tiver linhas de série ou se um gráfico de pizza de pizza ou barra de pizza tiver linhas de conector entre as duas seções. Boolean de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).HasSeriesLines = True

HasUpDownBars True se um gráfico de linhas tiver barras superiores e inferiores. Boolean de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).HasUpDownBars = True

HiLoLines Retorna linhas de máximo/mínimo de uma série em um gráfico de linhas. HiLoLines somente leitura.

Dim hllsHiLoLines As HiLoLines
Set hllsHiLoLines = ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).HiLoLines

Index Retorna o número de índice do objeto dentro da coleção de objetos similares. Long somente leitura.

Dim lngIndex As Long
lngIndex = ActiveWindow.RangeFromPoint.Chart.ChartGroups(1).Index

Overlap Especifica como barras e colunas são posicionadas. Long de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).Overlap = -50

Parent Retorna o pai do objeto especificado. Objetosomente leitura.

Dim objParent As Object
Set objParent = ActiveWindow.RangeFromPoint.Chart.ChartGroups(1).Parent

SecondPlotSize Retorna ou define o tamanho, como um percentual da pizza principal, da seção secundária de um gráfico de pizza de pizza ou um gráfico de barra de pizza. Long de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).SecondPlotSize = 50

SeriesLines Retorna as linhas de série de um gráfico de barras empilhadas 2D, colunas empilhadas 2D, pizza de pizza ou barra de pizza. SeriesLines somente leitura.

Dim slsSeriesLines As SeriesLines
Set slsSeriesLines = ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).SeriesLines

ShowNegativeBubbles True se as bolhas negativas são mostradas para o grupo de gráficos. Boolean de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).ShowNegativeBubbles = True

SizeRepresents Retorna ou define o que o tamanho da bolha representa em um gráfico de bolhas. Long de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).SizeRepresents = xlSizeIsArea

SplitType Retorna ou define a maneira como as duas seções de pizza do gráfico de pizza ou gráfico de barras de pizza são divididas. Leitura/gravação XlChartSplitType.

ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).SplitType = xlSplitByCustomSplit

UpBars Retorna as barras superiores em um gráfico de linhas. UpBars somente leitura.

Dim ubsUpBars As UpBars
Set ubsUpBars = ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).UpBars

VaryByCategories True se o Microsoft Word atribui uma cor ou padrão diferente para cada marcador de dados. Boolean de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.ChartGroups(1).VaryByCategories = True

ChartGroups.Count Retorna o número de objetos na coleção. Long somente leitura.

Dim lngCount As Long
lngCount = ActiveWindow.RangeFromPoint.Chart.ChartGroups.Count

ChartGroups.Parent Retorna o pai do objeto especificado. Objetosomente leitura.

Dim objParent As Object
Set objParent = ActiveWindow.RangeFromPoint.Chart.ChartGroups.Parent