HasDataLabels Property Example
This example turns on data labels for series three in Chart1.
With Charts("Chart1").SeriesCollection(3) .HasDataLabels = True .ApplyDataLabels Type:=xlValue End With