In diesem Beispiel wird der ersten Diagrammgruppe der Überlappungswert – 50 zugewiesen. Es ist sinnvoll, dieses Makro auf ein 2D – Säulendiagramm mit mindestens zwei Datenreihen anzuwenden.
Charts("Chart1").ChartGroups(1).Overlap = -50