Klasse Axis (Word VBA)

Die Klasse Axis stellt eine einzelne Achse in einem Diagramm dar.

Die wichtigste Prozeduren der Klasse Axis sind Delete und Select

Set

Um eine Axis -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim axi as Axis
Set axi = ActiveDocument.Background.Chart.Axes(Type:=1)

Die folgenden Prozeduren können zum Festlegen der Axis Klassenvariablen verwendet werden : Chart.Axes und Axes.Item

For Each

Hier ist ein Beispiel für die Verarbeitung der Axis -Elemente in einer Sammlung

Dim axi As Axis
For Each axi In ActiveDocument.Background.Chart.Axes()
	
Next axi

Themas

Einige Prozeduren in dieser Klasse wurden in Themen zusammengefasst und auf separaten Themenseiten beschrieben

Format with its procedures Border, Format, TickLabelSpacing, TickLabelSpacingIsAuto und TickMarkSpacing
Name with its procedures CategoryNames und HasTitle
Display/Show with its procedures DisplayUnit, DisplayUnitCustom und DisplayUnitLabel

Methoden

Die Hauptmethoden der Klasse Axis sind

Delete - Löscht das Objekt.

ActiveDocument.Background.Chart.Axes(1).Delete

Select - Markiert das Objekt.

ActiveDocument.Background.Chart.Axes(1).Select

Andere Methoden

Axes.Item - Gibt ein einzelnes Axis -Objekt aus einer aXes -Auflistung zurück.

Dim axi As Axis
Set axi = ActiveDocument.Background.Chart.Axes(Type:=1)

Eigenschaften

Axes.Count Gibt die Anzahl der Objekte in der Auflistung zurück.

Dim lngCount As Long
lngCount = ActiveDocument.Background.Chart.Axes.Count

Axes.Parent Gibt das übergeordnete Element für das angegebene Objekt zurück.

Dim objParent As Object
Set objParent = ActiveDocument.Background.Chart.Axes.Parent

AxisBetweenCategories True, wenn die Größenachse die Rubrikenachse zwischen den Rubriken schneidet.

ActiveDocument.Background.Chart.Axes(1).AxisBetweenCategories = True

AxisGroup Gibt den Typ der Achsengruppe zurück.

Dim xagAxisGroup As XlAxisGroup
xagAxisGroup = ActiveDocument.Background.Chart.Axes(1).AxisGroup

AxisTitle Gibt den Titel des angegebenen Diagramms zurück.

Dim ateAxisTitle As AxisTitle
Set ateAxisTitle = ActiveDocument.Background.Chart.Axes(1).AxisTitle

BaseUnit Gibt die Basiseinheit für die angegebene Rubrikenachse zurück oder legt diese fest.

ActiveDocument.Background.Chart.Axes(1).BaseUnit = xlDays

BaseUnitIsAuto True, Wenn Microsoft Word geeignete Basiseinheiten für die angegebene Rubrikenachse wählt.

ActiveDocument.Background.Chart.Axes(1).BaseUnitIsAuto = True

CategorySortOrder

ActiveDocument.Background.Chart.Axes(1).CategorySortOrder = xlCategoryAscending

CategoryType Gibt den Typ der Rubrikenachse zurück oder legt ihn fest.

ActiveDocument.Background.Chart.Axes(1).CategoryType = xlAutomaticScale

Crosses Zurückgeben oder festlegen den Punkt auf der angegebenen Achse Schnittpunkt mit die anderen Achse.

ActiveDocument.Background.Chart.Axes(1).Crosses = xlAxisCrossesAutomatic

CrossesAt Gibt auf der Größenachse den Schnittpunkt mit der Rubrikenachse zurück oder legt ihn fest.

ActiveDocument.Background.Chart.Axes(1).CrossesAt =

HasDisplayUnitLabel True, Wenn die durch die DisplayUnit oder DisplayUnitCustom -Eigenschaft angegebene Beschriftung auf der angegebenen Achse angezeigt wird.

ActiveDocument.Background.Chart.Axes(1).HasDisplayUnitLabel = True

HasMajorGridlines True, Wenn die Achse Haupt-Gitternetzlinien verfügt.

ActiveDocument.Background.Chart.Axes(1).HasMajorGridlines = True

HasMinorGridlines True, Wenn die Achse Hilfs-Gitternetzlinien verfügt.

ActiveDocument.Background.Chart.Axes(1).HasMinorGridlines = True

Height Gibt die Höhe des Objekts in Punktzurück.

Dim dblHeight As Double
dblHeight = ActiveDocument.Background.Chart.Axes(1).Height

Left Gibt den Abstand (in Punkt) vom linken Rand des Objekts zum linken Rand des Diagrammbereichs zurück.

Dim dblLeft As Double
dblLeft = ActiveDocument.Background.Chart.Axes(1).Left

LogBase Zurückgeben oder festlegen die Basis des Logarithmus bei Verwendung von Log skaliert.

ActiveDocument.Background.Chart.Axes(1).LogBase =

MajorGridlines Gibt die Hauptgitternetzlinien für die angegebene Achse zurück.

Dim grdsMajorGridlines As Gridlines
Set grdsMajorGridlines = ActiveDocument.Background.Chart.Axes(1).MajorGridlines

MajorTickMark Gibt die Art der Hauptteilstriche für die angegebene Achse zurück oder legt sie fest.

ActiveDocument.Background.Chart.Axes(1).MajorTickMark = xlTickMarkCross

MajorUnit Gibt die Haupteinheiten auf der Größenachse zurück oder legt sie fest.

ActiveDocument.Background.Chart.Axes(1).MajorUnit =

MajorUnitIsAuto True, Wenn Microsoft Word die Hilfseinheiten für die Größenachse automatisch berechnet.

ActiveDocument.Background.Chart.Axes(1).MajorUnitIsAuto = True

MajorUnitScale Zurückgeben oder Festlegen der wichtigsten Einheitenwert des Skalierung für die Rubrikenachse, wenn die CategoryType -Eigenschaft auf XlTimeScale festgelegt ist.

ActiveDocument.Background.Chart.Axes(1).MajorUnitScale = xlDays

MaximumScale Gibt das Maximum auf der Größenachse zurück oder legt es fest.

ActiveDocument.Background.Chart.Axes(1).MaximumScale =

MaximumScaleIsAuto True, Wenn Microsoft Word den Maximalwert für die Größenachse automatisch berechnet.

ActiveDocument.Background.Chart.Axes(1).MaximumScaleIsAuto = True

MinimumScale Gibt den Minimalwert auf der Größenachse zurück oder legt ihn fest.

ActiveDocument.Background.Chart.Axes(1).MinimumScale =

MinimumScaleIsAuto True, Wenn Microsoft Word den minimalen Wert für die Größenachse automatisch berechnet.

ActiveDocument.Background.Chart.Axes(1).MinimumScaleIsAuto = True

MinorGridlines Gibt die Hilfsgitternetzlinien für die angegebene Achse zurück.

Dim grdsMinorGridlines As Gridlines
Set grdsMinorGridlines = ActiveDocument.Background.Chart.Axes(1).MinorGridlines

MinorTickMark Gibt die Art der Hilfsteilstriche für die angegebene Achse zurück oder legt sie fest.

ActiveDocument.Background.Chart.Axes(1).MinorTickMark = xlTickMarkCross

MinorUnit Gibt die Hilfsintervalle auf der Größenachse zurück oder legt sie fest.

ActiveDocument.Background.Chart.Axes(1).MinorUnit =

MinorUnitIsAuto True, Wenn Microsoft Word Hilfsintervalle der Größenachse automatisch berechnet.

ActiveDocument.Background.Chart.Axes(1).MinorUnitIsAuto = True

MinorUnitScale Gibt an, oder der kleinere Einheit Scale-Wert für die Rubrikenachse festgelegt, wenn die CategoryType -Eigenschaft auf XlTimeScale festgelegt ist.

ActiveDocument.Background.Chart.Axes(1).MinorUnitScale = xlDays

Parent Gibt das übergeordnete Element für das angegebene Objekt zurück.

Dim objParent As Object
Set objParent = ActiveDocument.Background.Chart.Axes(1).Parent

ReversePlotOrder True, Wenn Microsoft Word Datenpunkte zeigt vom letzten zum ersten.

ActiveDocument.Background.Chart.Axes(1).ReversePlotOrder = True

ScaleType Gibt die Art der Skalierung für die Größenachse zurück oder legt sie fest.

ActiveDocument.Background.Chart.Axes(1).ScaleType = xlScaleLinear

TickLabelPosition Beschreibt die Position der Teilstrichbeschriftungen der angegebenen Achse.

ActiveDocument.Background.Chart.Axes(1).TickLabelPosition = xlTickLabelPositionHigh

TickLabels Gibt die Teilstrichbeschriftungen der angegebenen Achse zurück.

Dim tlsTickLabels As TickLabels
Set tlsTickLabels = ActiveDocument.Background.Chart.Axes(1).TickLabels

Top Gibt den Abstand (in Punkt) vom oberen Rand des Objekts zum oberen Ende der Zeile 1 (auf einem Arbeitsblatt) oder der Oberseite des Diagrammbereichs (in einem Diagramm) zurück.

Dim dblTop As Double
dblTop = ActiveDocument.Background.Chart.Axes(1).Top

Type Gibt den Achsentyp zurück.

ActiveDocument.Background.Chart.Axes(1).Type = xlCategory

Width Gibt die Breite des Objekts in Punktzurück.

Dim dblWidth As Double
dblWidth = ActiveDocument.Background.Chart.Axes(1).Width