Objeto ExtraColors (PowerPoint)

Representa los colores adicionales de una presentación. El objeto puede contener un máximo de ocho colores, cada uno de los cuales está representado por un valor de los componentes rojo, verde y azul (RGB).

Ejemplo:

Utilice la propiedad ExtraColors para devolver el objeto ExtraColors. Use ExtraColors (índice), donde index es el número de índice de color adicional, para devolver el valor rojo-verde-azul (RGB) para un único color adicional. En el siguiente ejemplo se agrega un rectángulo a la diapositiva uno de la presentación activa y se establece el color de fondo del relleno con el primer color adicional. Si no ha habido definido para la presentación al menos un color adicional, en este ejemplo se producirá un error.

With ActivePresentation
    Set rect = .Slides(1).Shapes _
        .AddShape(msoShapeRectangle, 50, 50, 100, 200)
    rect.Fill.ForeColor.RGB = .ExtraColors(1)
End With

Utilice el método Add para agregar un color adicional. En el siguiente ejemplo se agrega un color adicional a la presentación activa (si ya no se ha agregado el color).

ActivePresentation.ExtraColors.Add RGB(69, 32, 155)

Consulte también

Referencia del modelo de objetos de PowerPoint

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.