Axis.AxisGroup (PowerPoint)

Returns the type of axis group. Possible return values are xlPrimary - The primary axis group, xlSecondary - The secondary axis group.

Dim xagAxisGroup As XlAxisGroup
xagAxisGroup = ActiveWindow.RangeFromPoint.Chart.Axes(1).AxisGroup