BaseUnit Property Example

This example sets the category axis in embedded chart one on worksheet one to use a time scale, with months as the base unit.

With Worksheets(1).ChartObjects(1).Chart
    With .Axes(xlCategory)
        .CategoryType = xlTimeScale
        .BaseUnit = xlMonths
    End With
End With