Partager via


Méthode PictureEffects.Insert (Office)

Insère un effet d’image dans une chaîne d’effets composites.

Syntaxe

expression. Insert(EffectType, Position)

expression Expression qui renvoie un objet PictureEffects .

Paramètres

Nom Requis/Facultatif Type de données Description
EffectType Requis MsoPictureEffectType Énumération spécifiant le type d’effet d’image.
Position Facultatif Integer Position de l’effet dans la chaîne composite d’effets d’image.

Valeur renvoyée

PictureEffect

Remarques

Les effets d’image sont traités comme une chaîne composée d’éléments individuels appliqués dans l’ordre pour créer l’image composite finale. Une chaîne d’effets permet d’ajouter un effet à la chaîne, de la réorganiser ou de la supprimer de la chaîne.

Exemple

Le code suivant définit plusieurs propriétés de remplissage PictureEffect sur une forme dans une diapositive 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

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.