In diesem Beispiel werden der ersten Datenreihe in Chart1 Rubrikenbeschriftungen zugewiesen.
Charts("Chart1").SeriesCollection(1). _ ApplyDataLabels Type:=xlDataLabelsShowLabel