Propiedad FillFormat.GradientVariant (Word)
Devuelve la variante de degradado del relleno especificado como valor entero de 1 a 4 para la mayoría de los rellenos de degradado. Long de sólo lectura.
Sintaxis
expresión. GradientVariant
Expresión Variable que representa un objeto FillFormat .
Comentarios
Si el estilo de degradado es msoGradientFromCenter, esta propiedad devuelve 1 ó 2. Los valores de esta propiedad corresponden a las variantes de degradado (numeradas de izquierda a derecha y de arriba a abajo) en la ficha degradado en el cuadro de diálogo Efectos de relleno.
Use el método OneColorGradient o TwoColorGradient para establecer la variante de degradado para el relleno.
Ejemplo:
En este ejemplo, se agrega un rectángulo al documento activo y se establece la variante de degradado del relleno para que coincida con el de la forma denominada "rect1". Para que el ejemplo funcione, rect1 debe tener un relleno degradado.
Dim lngGradient As Long
With ActiveDocument.Shapes
lngGradient = .Item("rect1").Fill.GradientVariant
With .AddShape(msoShapeRectangle, 0, 0, 40, 80).Fill
.ForeColor.RGB = RGB(128, 0, 0)
.OneColorGradient msoGradientHorizontal, _
lngGradient, 1
End With
End With
Consulte también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.