Méthode Effect.MoveTo (PowerPoint)
Déplace l’objet spécifié vers un emplacement spécifique dans la même collection. Tous les autres éléments de la collection sont renumérotés.
Syntaxe
expression. MoveTo
( _toPos_
)
Expression Variable qui représente un objet Effect .
Parameters
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
Topos | Obligatoire | Long | La position d'index vers laquelle déplacer l'effet d'animation. |
Exemple
Cet exemple place un effet d’animation en deuxième position dans la collection d’animation d’effets pour la forme spécifiée.
Sub MoveEffect()
Dim sldFirst as Slide
Dim shpFirst As Shape
Dim effAdd As Effect
Set sldFirst = ActivePresentation.Slides(1)
Set shpFirst = sldFirst.Shapes(1)
Set effAdd = sldFirst.TimeLine.MainSequence.AddEffect _
(Shape:=shpFirst, effectId:=msoAnimEffectBlinds)
effAdd.MoveTo toPos:=2
End Sub
Cet exemple déplace la deuxième diapositive de la présentation active vers la première diapositive.
Sub MoveSlideToNewLocation()
ActivePresentation.Slides(2).MoveTo toPos:=1
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.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour