Classe Axis (PowerPoint VBA)

A classe Axis representa um único eixo em um gráfico.

Os principais procedimentos da classe Axis são Delete e Select

Set

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

Dim axi as Axis
Set axi = ActiveWindow.RangeFromPoint.Chart.Axes(Type:=1)

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

Temas

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

Axis with its procedures AxisBetweenCategories, AxisGroup e AxisTitle
Sort/Order with its procedures Border e ReversePlotOrder
Display/Show with its procedures DisplayUnit, DisplayUnitCustom, DisplayUnitLabel e HasDisplayUnitLabel
Format with its procedures Format, Height, TickLabelSpacing, TickLabelSpacingIsAuto, TickMarkSpacing e Width

Métodos

Estes são os principais métodos da classe Axis

Delete - Exclui o objeto.

ActiveWindow.RangeFromPoint.Chart.Axes(1).Delete

Select - Seleciona o objeto.

ActiveWindow.RangeFromPoint.Chart.Axes(1).Select

Estes são os principais métodos da classe

Axes.Item - Retorna um único objeto Axis de uma coleção Axes .

Dim axi As Axis
Set axi = ActivePresentation.Slides(1).Shapes(1).Chart.Axes(Type:=1)

SetProperty -

Dim strId As String: strId = 
ActiveWindow.RangeFromPoint.Chart.Axes(1).SetProperty Id:=strId, Value:=

Propriedades

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

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

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

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

BaseUnit Retorna ou define a unidade base para o eixo da categoria especificada. Leitura/gravação XlTimeUnit.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).BaseUnit = xlDays

BaseUnitIsAuto True se o Microsoft Word escolhe unidades base apropriadas para o eixo de categoria especificada. O padrão é True. Boolean de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).BaseUnitIsAuto = True

CategoryNames Retorna ou define todos os nomes de categoria como uma matriz de texto do eixo especificado. de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).CategoryNames = Array ("Cow", "Sheep", "Pig")

CategorySortOrder

ActiveWindow.RangeFromPoint.Chart.Axes(1).CategorySortOrder = xlCategoryAscending

CategoryType Retorna ou define o tipo de eixo de categoria. Leitura/gravação XlCategoryType.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).CategoryType = xlAutomaticScale

Crosses Retorna ou define o ponto do eixo especificado onde o outro eixo o atravessa. Long de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).Crosses = xlAxisCrossesAutomatic

CrossesAt Retorna ou define o ponto do eixo dos valores onde o eixo das categorias o cruza. Só se aplica ao eixo dos valores. Doublede leitura/gravação.

ActiveWindow.RangeFromPoint.Chart.Axes(1).CrossesAt =

HasMajorGridlines True se o eixo tiver linhas de grade principais. Boolean de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).HasMajorGridlines = True

HasMinorGridlines True se o eixo tiver linhas de grade secundárias. Boolean de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).HasMinorGridlines = True

HasTitle True se o eixo ou o gráfico tem um título visível. Boolean de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).HasTitle = True

Left Retorna a distância, em pontos, da borda esquerda do objeto à borda esquerda da área do gráfico. Doublesomente leitura.

Dim dblLeft As Double
dblLeft = ActiveWindow.RangeFromPoint.Chart.Axes(1).Left

LogBase Retorna ou define a base do logaritmo quando você estiver usando escalas de log. Doublede leitura/gravação.

ActiveWindow.RangeFromPoint.Chart.Axes(1).LogBase =

MajorGridlines Retorna as linhas de grade principais do eixo especificado. Linhas de grade somente leitura.

Dim grdsMajorGridlines As Gridlines
Set grdsMajorGridlines = ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).MajorGridlines

MajorTickMark Retorna ou define o tipo de marca de escala principal do eixo especificado. Leitura/gravação XlTickMark.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).MajorTickMark = xlTickMarkCross

MajorUnit Retorna ou define as unidades principais do eixo de valores. Doublede leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).MajorUnit = 10

MajorUnitIsAuto True se o Microsoft Word calcula as unidades principais para o eixo dos valores. Boolean de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).MajorUnitIsAuto = True

MajorUnitScale Retorna ou define o valor de escala de unidades principal para o eixo de categoria quando a Propriedade CategoryType é definida como xlTimeScale. Leitura/gravação XlTimeUnit.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).MajorUnitScale = xlDays

MaximumScale Retorna ou define o valor máximo no eixo dos valores. Doublede leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).MaximumScale = 500

MaximumScaleIsAuto True se o Microsoft Word calcula o valor máximo para o eixo dos valores. Boolean de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).MaximumScaleIsAuto = True

MinimumScale Retorna ou define o valor mínimo no eixo dos valores. Doublede leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).MinimumScale = 50

MinimumScaleIsAuto True se o Microsoft Word calcula o valor mínimo para o eixo dos valores. Boolean de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).MinimumScaleIsAuto = True

MinorGridlines Retorna as linhas de grade secundárias do eixo especificado. Linhas de grade somente leitura.

Dim grdsMinorGridlines As Gridlines
Set grdsMinorGridlines = ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).MinorGridlines

MinorTickMark Retorna ou define o tipo de marca de escala secundária do eixo especificado. Leitura/gravação XlTickMark.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).MinorTickMark = xlTickMarkCross

MinorUnit Retorna ou define as unidades secundárias do eixo dos valores. Doublede leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).MinorUnit = 10

MinorUnitIsAuto True se o Microsoft Word calcula as unidades secundárias do eixo dos valores. Boolean de leitura/gravação.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).MinorUnitIsAuto = True

MinorUnitScale Retorna ou define o valor de escala de unidades secundária para o eixo de categoria quando a Propriedade CategoryType é definida como xlTimeScale. Leitura/gravação XlTimeUnit.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).MinorUnitScale = xlDays

Parent Retorna o pai do objeto especificado. Objetosomente leitura.

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

ScaleType Retorna ou define o tipo de escala do eixo dos valores. Leitura/gravação XlScaleType.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).ScaleType = xlScaleLinear

TickLabelPosition Descreve a posição dos rótulos de marcas de escala no eixo especificado. Leitura/gravação XlTickLabelPosition.

ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).TickLabelPosition = xlTickLabelPositionHigh

TickLabels Retorna os rótulos das marcas de escala do eixo especificado. TickLabels somente leitura.

Dim tlsTickLabels As TickLabels
Set tlsTickLabels = ActivePresentation.Slides(1).Shapes(1).Chart.Axes(1).TickLabels

Top Retorna a distância, em pontos, da borda superior do objeto à parte superior da linha 1 em uma planilha ou a parte superior da área do gráfico (em um gráfico). Doublesomente leitura.

Dim dblTop As Double
dblTop = ActiveWindow.RangeFromPoint.Chart.Axes(1).Top

Type Retorna o tipo de eixo. XlAxisType somente leitura.

ActiveWindow.RangeFromPoint.Chart.Axes(1).Type = xlCategory