Thanks for the reply – I wish the answer was that simple. Let me explain using an example:
Say I make a rectangle on a worksheet called Rectangle 1
I can create a gradient using the following:
The gradient that is created uses two colors, but only the first color has transparency. The second color is opaque. I can manually set the transparency of the second color using
Dim abc As Shape
Set abc = ActiveSheet.Shapes("Rectangle 1")
.Fill.Transparency = 0.25
.Fill.Visible = msoTrue
.Fill.ForeColor.SchemeColor = 24
.Fill.BackColor.SchemeColor = 34
.Fill.TwoColorGradient msoGradientHorizontal, 1
FORMAT AUTOSHAPE : COLOR : FILL EFFECTS : TRANSPARANCY TO
The macro recorder does not pick up any property associated with the transparency of the second color. I also cannot find any reference to the transparency setting for the second color by poking around in the shape properties in the VB editor locals window.
Any help would be appreciated.