Compartir a través de


Método PictureEffects.Insert (Office)

Inserta un efecto de imagen en una cadena de efectos compuestos.

Sintaxis

expresión. Insert(EffectType, Position)

expresión Expresión que devuelve un objeto PictureEffects .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
EffectType Obligatorio MsoPictureEffectType Enumeración que especifica el tipo de efecto de imagen.
Position Opcional Integer Posición del efecto en la cadena compuesta de efectos de imagen.

Valor devuelto

PictureEffect

Observaciones

Los efectos de imagen se procesan como una cadena compuesta por elementos individuales que se aplican en secuencia para crear la imagen compuesta final. Una cadena de efectos permitirá agregar un efecto a la cadena, reordenar o quitarlo de la cadena.

Ejemplo

El código siguiente establece varias propiedades de relleno PictureEffect en una forma de una diapositiva de Microsoft PowerPoint.

Sub PictureEffectSample() 
' Setup a slide with one picture shape. 
With ActivePresentation.Slides(1).Shapes(1).Fill.PictureEffects 
 
 ' Insert a 150% Saturation effect. 
 .Insert(msoEffectSaturation).EffectParameters(1).Value = 1.5 
 
 ' Insert Brightness/Contrast effect and set values to -50% Brightness and +25% Contrast. 
 Dim brightnessContrast As PictureEffect 
 Set brightnessContrast = .Insert(msoEffectBrightnessContrast) 
 brightnessContrast.EffectParameters(1).Value = -0.5 
 brightnessContrast.EffectParameters(2).Value = 0.25 
 
 ' Remove all Picture effects. 
 While .Count > 0 
 .Delete (1) 
 Wend 
 
End With 
End Sub

Vea 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.