Bewerken

Delen via


FillFormat.GradientStyle property (PowerPoint)

Returns the gradient style for the specified fill. Read-only.

Syntax

expression.GradientStyle

expression A variable that represents a FillFormat object.

Return value

MsoGradientStyle

Remarks

Use the OneColorGradient, PresetGradient, or TwoColorGradient method to set the gradient style for the fill. Attempting to return this property for a fill that doesn't have a gradient generates an error. Use the Type property to determine whether the fill has a gradient.

The value returned by the GradientStyle property can be one of these MsoGradientStyle constants.

msoGradientDiagonalDown
msoGradientDiagonalUp
msoGradientFromCenter
msoGradientFromCorner
msoGradientFromTitle
msoGradientHorizontal
msoGradientMixed
msoGradientVertical

Example

This example adds a rectangle to myDocument and sets its fill gradient style to match that of the shape named "rect1." For the example to work, rect1 must have a gradient fill.

Set myDocument = ActivePresentation.Slides(1)

With myDocument.Shapes

    gradStyle1 = .Item("rect1").Fill.GradientStyle

    With .AddShape(msoShapeRectangle, 0, 0, 40, 80).Fill

        .ForeColor.RGB = RGB(128, 0, 0)

        .OneColorGradient gradStyle1, 1, 1

    End With

End With

See also

FillFormat Object

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.