Compartir a través de

Método GradientStops.Delete (Office)

  • Artículo

Quita un punto de degradado.

Sintaxis

expresión. Eliminar (índice)

Expresión Expresión que devuelve un objeto GradientStops .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Index Opcional Integer Número de índice del punto de degradado.

Comentarios

Un degradado es una transición sin problemas desde un estado de color a otro. El punto final de estas secciones se denomina punto de degradado.

Ejemplo:

En el ejemplo siguiente se agregan tres puntos de color de degradado y se elimina el primer punto de degradado.

Sub gradients() 
 Set myDocument = ActivePresentation.Slides(1) 
 Set GradientShapeFill = myDocument.Shapes.AddShape(msoShapeRectangle, 90, 90, 90, 80).Fill 
 With GradientShapeFill 
 .ForeColor.RGB = RGB(0, 128, 128) 
 .OneColorGradient msoGradientHorizontal, 1, 1 
 .GradientStops.Insert RGB(255, 0, 0), 0.25 
 .GradientStops.Insert RGB(0, 255, 0), 0.5 
 .GradientStops.Insert RGB(0, 0, 255), 0.75 
 End With 
 GradientShapeFill.GradientStops.Delete (1) 
End Sub

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.