Axis.MinorUnitScale (Word)

Returns or sets the minor unit scale value for the category axis when the CategoryType property is set to xlTimeScale. Possible return values are xlDays - Days, xlMonths - Months, xlYears - Years.

MinorUnitScale can be one of the following xlTimeUnit constants:

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 With .Chart.Axes(xlCategory) 
 .CategoryType = xlTimeScale 
 .MajorUnit = 5 
 .MajorUnitScale = xlDays 
 .MinorUnit = 1 
 .MinorUnitScale = xlDays 
 End With 
 End If 
End With