AxisTitle.Name (Word)

Retorna um valor String que representa o nome do objeto.

Dim strName As String
strName = ActiveDocument.Background.Chart.Axes(1).AxisTitle.Name