Clase Axis (Excel VBA)

La clase Axis representa un solo eje de un gráfico.

Los principales procedimientos de la clase Axis son Delete y Select

Set

Para usar una variable de clase Axis, primero debe ser instanciado, por ejemplo

Dim axi as Axis
Set axi = ActiveChart.Axes(Type:=1)

Los siguientes procedimientos se pueden usar para establecer variables de clase Axis : Chart.Axes y Axes.Item

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos Axis en una colección.

Dim axiAxe As Axis
For Each axiAxe In ActiveChart.Axes()
	
Next axiAxe

Temas

Los siguientes procedimientos de esta clase se han agrupado y se describen en una página temática separada

Name with its procedures AxisTitle, CategoryNames y HasTitle

Métodos

Los principales métodos de la clase Axis son

Delete - Elimina el objeto.

ActiveChart.Axes(1).Delete

Select - Selecciona el objeto.

ActiveChart.Axes(1).Select

Otros Métodos

Axes.Item - Devuelve un único objeto Axis de una colección Axes.

SetProperty -

Propiedades

Axes.Count Devuelve un valor Long que representa el número de objetos de la colección.

Dim lngCount As Long
lngCount = ActiveChart.Axes.Count

Axes.Parent Devuelve el objeto primario del objeto especificado.

Dim objParent As Object
Set objParent = ActiveChart.Axes.Parent

AxisBetweenCategories True si el eje de valores cruza al eje de categorías entre categorías.

ActiveChart.Axes(1).AxisBetweenCategories = True

AxisGroup Devuelve el grupo del eje especificado.

Dim xagAxisGroup As XlAxisGroup
xagAxisGroup = ActiveChart.Axes(1).AxisGroup

BaseUnit Devuelve o establece la unidad base del eje de categorías especificado.

ActiveChart.Axes(1).BaseUnit = xlDays

BaseUnitIsAuto True si Microsoft Excel elige las unidades de base apropiadas para el eje de categorías especificado.

ActiveChart.Axes(1).BaseUnitIsAuto = True

Border Devuelve un objeto Border que representa el borde del objeto.

Dim brdBorder As Border
Set brdBorder = ActiveChart.Axes(1).Border

CategorySortOrder

ActiveChart.Axes(1).CategorySortOrder = xlCategoryAscending

CategoryType Devuelve o establece el tipo del eje de categorías.

ActiveChart.Axes(1).CategoryType = xlAutomaticScale

Crosses Devuelve o establece el punto en el eje especificado donde se cruza el otro eje.

ActiveChart.Axes(1).Crosses = xlAxisCrossesAutomatic

CrossesAt Devuelve o establece el punto del eje de valores donde se cruza el eje de categorías.

ActiveChart.Axes(1).CrossesAt = 3

DisplayUnit Devuelve o establece el rótulo de unidades del eje de valores.

ActiveChart.Axes(1).DisplayUnit = xlHundredMillions

DisplayUnitCustom Si el valor de la propiedad DisplayUnit es xlCustom, la propiedad DisplayUnitCustom devuelve o establece el valor de las unidades mostradas.

ActiveChart.Axes(1).DisplayUnitCustom = 500

DisplayUnitLabel Devuelve el objeto DisplayUnitLabel para el eje especificado.

Dim dulDisplayUnitLabel As DisplayUnitLabel
Set dulDisplayUnitLabel = ActiveChart.Axes(1).DisplayUnitLabel

Format Devuelve el objeto ChartFormat .

Dim cftFormatted As ChartFormat
Set cftFormatted = ActiveChart.Axes(1).Format

HasDisplayUnitLabel True si la etiqueta especificada por la propiedad DisplayUnit o DisplayUnitCustom se muestra en el eje especificado.

ActiveChart.Axes(1).HasDisplayUnitLabel = True

HasMajorGridlines True si el eje tiene líneas de división principales.

ActiveChart.Axes(1).HasMajorGridlines = True

HasMinorGridlines True si el eje tiene líneas de división secundarias.

ActiveChart.Axes(1).HasMinorGridlines = True

Height Devuelve un valor de tipo Double que representa el alto, en puntos, del objeto.

Dim dblHeight As Double
dblHeight = ActiveChart.Axes(1).Height

Left Devuelve un valor de tipo Double que representa la distancia, en puntos, desde el borde izquierdo del objeto hasta el borde izquierdo del área del gráfico.

Dim dblLeft As Double
dblLeft = ActiveChart.Axes(1).Left

LogBase Devuelve o establece la base del logaritmo cuando se utiliza la escala de registro.

ActiveChart.Axes(1).LogBase =

MajorGridlines Devuelve un objeto GridLines que representa las líneas de cuadrícula principales del eje especificado.

Dim grdsMajorGridlines As Gridlines
Set grdsMajorGridlines = ActiveChart.Axes(1).MajorGridlines

MajorTickMark Devuelve o establece el tipo de marcas de graduación principales del eje especificado.

ActiveChart.Axes(1).MajorTickMark = xlTickMarkCross

MajorUnit Devuelve o establece las unidades principales para el eje de valores.

ActiveChart.Axes(1).MajorUnit = 200

MajorUnitIsAuto Es True si Microsoft Excel calcula las unidades principales del eje de valores.

ActiveChart.Axes(1).MajorUnitIsAuto = True

MajorUnitScale Devuelve o establece el valor de la escala de las unidades principales del eje de categorías cuando la propiedad CategoryType tiene el valor xlTimeScale.

ActiveChart.Axes(1).MajorUnitScale = xlDays

MaximumScale Devuelve o establece el valor máximo del eje de valores.

ActiveChart.Axes(1).MaximumScale = 120

MaximumScaleIsAuto Es True si Microsoft Excel calcula el valor máximo para el eje de valores.

ActiveChart.Axes(1).MaximumScaleIsAuto = True

MinimumScale Devuelve o establece el valor mínimo del eje de valores.

ActiveChart.Axes(1).MinimumScale =

MinimumScaleIsAuto True si Microsoft Excel calcula el valor mínimo del eje de valores.

ActiveChart.Axes(1).MinimumScaleIsAuto = True

MinorGridlines Devuelve un objeto GridLines que representa las líneas de división secundarias del eje especificado.

Dim grdsMinorGridlines As Gridlines
Set grdsMinorGridlines = ActiveChart.Axes(1).MinorGridlines

MinorTickMark Devuelve o establece el tipo de marcas de graduación principales del eje especificado.

ActiveChart.Axes(1).MinorTickMark = xlTickMarkCross

MinorUnit Devuelve o establece las unidades secundarias del eje de valores.

ActiveChart.Axes(1).MinorUnit =

MinorUnitIsAuto True si Microsoft Excel calcula las unidades secundarias del eje de valores.

ActiveChart.Axes(1).MinorUnitIsAuto = True

MinorUnitScale Devuelve o establece el valor de la escala de las unidades secundarias del eje de categorías cuando la propiedad CategoryType tiene el valor xlTimeScale.

ActiveChart.Axes(1).MinorUnitScale = xlDays

Parent Devuelve el objeto primario del objeto especificado.

Dim objParent As Object
Set objParent = ActiveChart.Axes(1).Parent

ReversePlotOrder Es True si Microsoft Excel traza los puntos de datos desde el último al primero.

ActiveChart.Axes(1).ReversePlotOrder = True

ScaleType Devuelve o establece el tipo de escala del eje de valores.

ActiveChart.Axes(1).ScaleType = xlScaleLinear

TickLabelPosition Describe la posición de los rótulos de marca de graduación en el eje especificado.

ActiveChart.Axes(1).TickLabelPosition = xlTickLabelPositionHigh

TickLabels Devuelve un objeto TickLabels que representa las etiquetas de marcas de graduación del eje especificado.

Dim tlsTickLabels As TickLabels
Set tlsTickLabels = ActiveChart.Axes(1).TickLabels

TickLabelSpacing Devuelve o establece el numero de categorías o series entre rótulos de marcas de graduación.

ActiveChart.Axes(1).TickLabelSpacing = 10

TickLabelSpacingIsAuto Devuelve o establece si el espaciado de las marcas de graduación es automático.

ActiveChart.Axes(1).TickLabelSpacingIsAuto = True

TickMarkSpacing Devuelve o establece el número de categorías o series existentes entre las marcas de graduación.

ActiveChart.Axes(1).TickMarkSpacing = 10

Top Devuelve un valor de tipo Double que representa la distancia, en puntos, desde el borde superior del objeto hasta la parte superior de la fila 1 (en una hoja de cálculo) o hasta la parte superior del área del gráfico (en un gráfico).

Dim dblTop As Double
dblTop = ActiveChart.Axes(1).Top

Type Devuelve un valor XlAxisType que representa el tipo de eje.

ActiveChart.Axes(1).Type = xlCategory

Width Devuelve un valor de tipo Double que representa el ancho, en puntos, del objeto.

Dim dblWidth As Double
dblWidth = ActiveChart.Axes(1).Width