BaseUnitIsAuto Property Example

This example sets the category axis in embedded chart one on worksheet one to use a time scale with automatic base units.

With Worksheets(1).ChartObjects(1).Chart
    With .Axes(xlCategory)
        .CategoryType = xlTimeScale
        .BaseUnitIsAuto = True
    End With
End With