Méthode TextRange.InsertBefore (Publisher)

Ajoute une chaîne au début d'une 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. InsertBefore (NewText)

Expression Variable qui représente un objet TextRange .

Parameters

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

Valeur renvoyée

TextRange

Exemple

Cet exemple ajoute le numéro de compilation de Microsoft Publisher et un saut de paragraphe au début de la première forme de la première page de la composition active. Cela suppose que la forme spécifiée est un cadre de texte et non un autre type de forme.

Sub InsertTextBefore() 
 With ActiveDocument.Pages(1).Shapes(1) 
 .TextFrame.TextRange.InsertBefore _ 
 NewText:="Microsoft Publisher Build : " & Build & vbCrLf 
 End With 
End Sub

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.