TextRange.Move, méthode (Publisher)

  • Article

Réduit la plage spécifiée à sa position de début ou de fin, puis déplace l’objet réduit selon le nombre d’unités spécifié. Cette méthode renvoie un type Long qui représente le nombre d'unités selon lequel l'objet a été déplacé réellement, ou elle renvoie 0 (zéro) si le déplacement a échoué.

Syntaxe

expression. Déplacer (Unité, Taille)

Expression Variable qui représente un objet TextRange .

Parameters

Nom Requis/Facultatif Type de données Description
Unit Requis PbTextUnit Unité utilisée pour le déplacement de la plage ou de la sélection réduite. Il peut s’agir de l’une des constantes PbTextUnit déclarées dans la bibliothèque de types Microsoft Publisher.
Size Obligatoire Entier long Le nombre d'unités selon lequel la plage spécifiée ou la sélection doit être déplacée.

Si Size est un nombre positif, l'objet est réduit à sa position de fin et déplacée vers l'avant dans le document, selon le nombre d'unités spécifié. Si Size est un nombre négatif, l'objet est réduit à sa position de début et déplacé du nombre d'unités spécifié vers l'arrière.

Vous pouvez également contrôler la direction de la réduction à l’aide de la méthode Collapse avant d’utiliser la méthode Move .

Valeur renvoyée

Entier long

Exemple

Cet exemple réduit la plage spécifiée et insère une nouvelle phrase au début de la plage.

Sub MoveText() 
 Dim rngText As TextRange 
 Set rngText = ActiveDocument.Pages(1).Shapes(1).TextFrame _ 
 .TextRange.Words(Start:=1, Length:=5) 
 With rngText 
 .Move Unit:=pbTextUnitParagraph, Size:=-1 
 .Text = "This adds new text to the beginning of the range. " 
 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.