Compartilhar via


Objeto PictureEffect (Office)

Representa um efeito de imagem.

Comentários

Os efeitos de imagem são processados como uma cadeia composta por itens individuais que são aplicados em sequência para criar a imagem composta final. Uma cadeia de efeitos permitirá adicionar um efeito à cadeia, reordenar ou remover da cadeia.

Exemplo

O código seguinte define várias propriedades de preenchimento PictureEffect numa forma num diapositivo do 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

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.