FilterEffect.Reveal Property
Determines how the embedded objects will be revealed. Read/write.
Namespace: Microsoft.Office.Interop.PowerPoint
Assembly: Microsoft.Office.Interop.PowerPoint (in Microsoft.Office.Interop.PowerPoint.dll)
Syntax
'Declaration
Property Reveal As MsoTriState
Get
Set
'Usage
Dim instance As FilterEffect
Dim value As MsoTriState
value = instance.Reveal
instance.Reveal = value
MsoTriState Reveal { get; set; }
Property Value
Type: Microsoft.Office.Core.MsoTriState
MsoTriState
Remarks
Setting a value of msoTrue for the Reveal property when the filter effect type is msoAnimFilterEffectTypeWipe will make the shape appear. Setting a value of msoFalse will make the object disappear. In other words, if your filter is set to wipe and Reveal is true, you will get a wipe-in effect, and when Reveal is false, you will get a wipe-out effect.
The value of the Reveal property can be one of these MsoTriState constants.
msoFalse |
msoTrue |
Examples
The following example adds a shape to the first slide of the active presentation and sets a filter effect animation behavior.
Sub ChangeFilterEffect()
Dim sldFirst As Slide
Dim shpHeart As Shape
Dim effNew As Effect
Dim bhvEffect As AnimationBehavior
Set sldFirst = ActivePresentation.Slides(1)
Set shpHeart = sldFirst.Shapes.AddShape(Type:=msoShapeHeart, _
Left:=100, Top:=100, Width:=100, Height:=100)
Set effNew = sldFirst.TimeLine.MainSequence.AddEffect _
(Shape:=shpHeart, EffectID:=msoAnimEffectChangeFillColor, _
Trigger:=msoAnimTriggerAfterPrevious)
Set bhvEffect = effNew.Behaviors.Add(msoAnimTypeFilter)
With bhvEffect.FilterEffect
.Type = msoAnimFilterEffectTypeWipe
.Subtype = msoAnimFilterEffectSubtypeUp
.Reveal= msoTrue
End With
End Sub