Sequence.ConvertToTextUnitEffect Method
Returns an ColorEffect object that represents how text should be animated.
Namespace: Microsoft.Office.Interop.PowerPoint
Assembly: Microsoft.Office.Interop.PowerPoint (in Microsoft.Office.Interop.PowerPoint.dll)
Syntax
'Declaration
Function ConvertToTextUnitEffect ( _
Effect As Effect, _
unitEffect As MsoAnimTextUnitEffect _
) As Effect
'Usage
Dim instance As Sequence
Dim Effect As Effect
Dim unitEffect As MsoAnimTextUnitEffect
Dim returnValue As Effect
returnValue = instance.ConvertToTextUnitEffect(Effect, _
unitEffect)
Effect ConvertToTextUnitEffect(
Effect Effect,
MsoAnimTextUnitEffect unitEffect
)
Parameters
- Effect
Type: Microsoft.Office.Interop.PowerPoint.Effect
The animation effect to which the text unit effect applies.
- unitEffect
Type: Microsoft.Office.Interop.PowerPoint.MsoAnimTextUnitEffect
How the text should be animated.
Return Value
Type: Microsoft.Office.Interop.PowerPoint.Effect
Effect
Examples
This example adds an animation to a given shape and animates its accompanying text by character.
Sub NewTextUnitEffect()
Dim shpFirst As Shape
Dim tmlMain As TimeLine
Set shpFirst = ActivePresentation.Slides(1).Shapes(1)
Set tmlMain = ActivePresentation.Slides(1).TimeLine
tmlMain.MainSequence.ConvertToTextUnitEffect_
Effect:=tmlMain.MainSequence.AddEffect(Shape:=shpFirst, _
EffectID:=msoAnimEffectRandomEffects), _
unitEffect:=msoAnimTextUnitEffectByCharacter
End Sub