This example splits the specified axis and sets the minimum and maximum values for the split.
Set c = ChartSpace1.Constants
Set sc = ChartSpace1.Charts(0).Axes(c.chAxisPositionLeft).Scaling
sc.HasSplit = True
sc.SplitMinimum = 100
sc.SplitMaximum = 500