Метод PictureEffects.Insert (Office)

Статья
04/07/2023

Вставляет эффект рисунка в цепочку составных эффектов.

Синтаксис

expression. Insert(EffectType, Position)

Выражение Выражение, возвращающее объект PictureEffects .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
EffectType	Обязательный	MsoPictureEffectType	Перечисление, указывающее тип эффекта рисунка.
Position	Необязательный	Integer	Положение эффекта в составной цепочке эффектов рисунка.

Возвращаемое значение

PictureEffect

Замечания

Эффекты рисунков обрабатываются в виде цепочки, состоящей из отдельных элементов, которые последовательно применяются для создания окончательного составного изображения. Цепочка эффектов позволит добавить эффект в цепочку, изменить порядок или удалить из цепочки.

Пример

Следующий код задает несколько свойств заливки PictureEffect для фигуры на слайде 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

См. также

Элементы объекта PictureEffects

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через