Axis.TickLabelPosition (Word)
Beschreibt die Position der Teilstrichbeschriftungen der angegebenen Achse. Mögliche Rückgabewerte sind xlTickLabelPositionHigh - Die obere oder rechte Seite des Diagramms, xlTickLabelPositionLow - Die untere oder linke Seite des Diagramms, xlTickLabelPositionNextToAxis - Neben der Achse (wenn sich die Achse nicht an der Seite des Diagramms befindet), xlTickLabelPositionNone - Keine Teilstriche.
With ActiveDocument.InlineShapes(1)
If .HasChart Then
.Chart.Axes(xlCategory) _
.TickLabelPosition = xlTickLabelPositionHigh
End If
End With