Offset Property (TickLabels Collection) Example

This example sets the label spacing of the value axis in Chart1 to twice the current setting, if the offset is less than 500.

With Charts("Chart1").Axes(xlValue).TickLabels
    If .Offset < 500 then
        .Offset = .Offset * 2
    End If
End With