TextRange.InsertAfter, méthode (PowerPoint)

Article
04/07/2023

Ajoute une chaîne à la fin de la plage de texte spécifiée. Renvoie un objet TextRange qui représente le texte ajouté. Utilisée sans argument, cette méthode renvoie une chaîne vide à la fin de la plage spécifiée.

Syntaxe

expression. InsertAfter( _NewText_ )

Expression Variable qui représente un objet TextRange .

Parameters

Nom	Requis/Facultatif	Type de données	Description
NewText	Facultatif	Chaîne	Texte à insérer. La valeur par défaut est une chaîne vide.

Exemple

Cet exemple montre comment ajouter la chaîne « : Test version » à la fin du titre de la diapositive 1 de la présentation en cours.

With Application.ActivePresentation.Slides(1).Shapes(1)

    .TextFrame.TextRange.InsertAfter ": Test version"

End With

Cet exemple montre comment ajouter le contenu du Presse-papiers à la fin du titre de la diapositive 1.

Application.ActivePresentation.Slides(1).Shapes(1).TextFrame _
    .TextRange.InsertAfter.Paste

Voir aussi

Objet TextRange

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.