Axis.CategorySortOrder (Word)

Os valores de retorno possíveis são xlCategoryAscending, xlCategoryDescending, xlIndexAscending, xlIndexDescending.

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