Hallo,
bei dem Versuch einen Farbverlauf zu programmieren, stosse ich immer wieder auf das gleiche Problem. Ich programmiere 5 GradientStops, schaue ich aber unter "Form formatieren" werden mir 7 Stops angezeigt. Der erste und letzte Stop wird scheinbar immer noch
einml extra gesetzt, allerdings Farbe Weiss. Ich habe von PowerPoint eine Farbverlaufsvorlage versucht nachzuprogrammieren, mit exakt den gleichen Farbwerten und Stops. Allerdings erhalte ich ein anderes Ergebnis. An letzter Position (also GradientStops.Insert(RGB(....),
1.0) und an erster Position (GradientStops.Insert(RGB(...), 0.0) wird immer noch ein zweiter Wert automatisch gesetzt welcher Auswirkungen auf das gesamte Erscheinungsbild der FillFormat-Eigenschaft hat
Hier mein Code:
App.ActiveWindow.Selection.ShapeRange.Fill.TwoColorGradient(MsoGradientStyle.msoGradientHorizontal, 1)
App.ActiveWindow.Selection.ShapeRange.Fill.GradientStops.Insert(RGB(0, 0, 130), 0.0)
App.ActiveWindow.Selection.ShapeRange.Fill.GradientStops.Insert(RGB(102, 0, 143), 0.3)
App.ActiveWindow.Selection.ShapeRange.Fill.GradientStops.Insert(RGB(186, 0, 102), 0.65)
App.ActiveWindow.Selection.ShapeRange.Fill.GradientStops.Insert(RGB(255, 0, 0), 0.9)
App.ActiveWindow.Selection.ShapeRange.Fill.GradientStops.Insert(RGB(255, 130, 0), 1.0)
Woran liegt es, dass egal wieviele Stops ich programmiere immer 2 mehr angelegt werden die dann Einfluss auf das Gesamtergebnis haben?
