DisplayUnitCustom Property Example

This example sets the units displayed on the value axis in Chart1 to increments of 500.

With Charts("Chart1").Axes(xlValue)
    .DisplayUnit = xlCustom
    .DisplayUnitCustom = 500
    .HasTitle = True
    .AxisTitle.Caption = "Rebate Amounts"
End With