Axis.CategoryType (Word)
Retorna ou define o tipo de eixo de categorias. XlCategoryType de leitura/gravação. Os valores de retorno possíveis são xlAutomaticScale - O Word controla do tipo de eixo, xlCategoryScale - O eixo agrupa os dados por um conjunto arbitrário de categorias, xlTimeScale - O eixo agrupa os dados em uma escala de tempo.
Você não pode definir essa propriedade para um eixo dos valores.
With ActiveDocument.InlineShapes(1)
If .HasChart Then
With .Chart.Axes(xlCategory)
.CategoryType = xlTimeScale
.BaseUnit = xlMonths
End With
End If
End With