Comment : étendre des plages dans des documents par programmation

Article
03/04/2013

Une fois que vous avez défini un objet Range dans un document Microsoft Office Word, vous modifiez son point de départ et son point de fin à l'aide des méthodes MoveStart et MoveEnd.Les méthodes MoveStart et MoveEnd utilisent les deux mêmes arguments, à savoir Unit et Count.L'argument Count correspond au nombre d'unités à déplacer, tandis que l'argument Unit peut être l'une des valeurs WdUnits suivantes :

S'applique à : Les informations contenues dans cette rubrique s'appliquent aux projets de niveau document et de niveau application pour Word 2013 et Word 2010. Pour en savoir plus, consultez Fonctionnalités disponibles par type d'application et de projet Office.

L'exemple suivant définit une plage de sept caractères.Il déplace ensuite la position de début de la plage de sept caractères après la position de début d'origine.Étant donné que la position de fin de la plage était également de sept caractères après la position de début, la plage obtenue se compose de zéro caractère.Le code déplace ensuite la position de fin de sept caractères après la position de fin actuelle.

Pour étendre une plage

Définissez une plage de caractères.Pour plus d’informations, consultez Comment : définir et sélectionner des plages dans les documents par programmation.

L'exemple de code suivant peut être utilisé dans une personnalisation au niveau du document.
```
Dim rng As Word.Range = Me.Range(Start:=0, End:=7)
```
```
object start = 0;
object end = 7;
Word.Range rng = this.Range(ref start, ref end);
```
L'exemple de code suivant peut être utilisé dans un complément d'application.Cet exemple utilise le document actif.
```
Dim rng As Word.Range = Me.Application.ActiveDocument.Range(Start:=0, End:=7)
```
```
Word.Range rng = this.Application.ActiveDocument.Range(0, 7);
```

Utilisez la méthode MoveStart de l'objet Range pour déplacer la position de départ de la plage.

rng.MoveStart(Unit:=Word.WdUnits.wdCharacter, Count:=7)

rng.MoveStart(Word.WdUnits.wdCharacter, 7);

Utilisez la méthode MoveEnd de l'objet Range pour déplacer la position finale de la plage.

rng.MoveEnd(Unit:=Word.WdUnits.wdCharacter, Count:=7)

rng.MoveEnd(Word.WdUnits.wdCharacter, 7);

Code de personnalisation au niveau du document

Pour étendre une plage dans une personnalisation au niveau du document

L'exemple suivant affiche le code complet correspondant à une personnalisation au niveau du document.Pour utiliser ce code, exécutez-le dans votre projet à partir de la classe ThisDocument.

' Define a range of 7 characters.
Dim rng As Word.Range = Me.Range(Start:=0, End:=7)

' Move the start position 7 characters.
rng.MoveStart(Unit:=Word.WdUnits.wdCharacter, Count:=7)

' Move the end position 7 characters.
rng.MoveEnd(Unit:=Word.WdUnits.wdCharacter, Count:=7)

// Define a range of 7 characters.
object start = 0;
object end = 7;
Word.Range rng = this.Range(ref start, ref end);

// Move the start position 7 characters.
rng.MoveStart(Word.WdUnits.wdCharacter, 7);

// Move the end position 7 characters.
rng.MoveEnd(Word.WdUnits.wdCharacter, 7);

Code de complément d'application

Pour étendre une plage dans un complément d'application

L'exemple suivant affiche le code complet correspondant à un complément d'application.Pour utiliser ce code, exécutez-le dans votre projet à partir de la classe ThisAddIn.

' Define a range of 7 characters.
Dim rng As Word.Range = Me.Application.ActiveDocument.Range(Start:=0, End:=7)

' Move the start position 7 characters.
rng.MoveStart(Unit:=Word.WdUnits.wdCharacter, Count:=7)

' Move the end position 7 characters.
rng.MoveEnd(Unit:=Word.WdUnits.wdCharacter, Count:=7)

// Define a range of 7 characters.
Word.Range rng = this.Application.ActiveDocument.Range(0, 7);

// Move the start position 7 characters.
rng.MoveStart(Word.WdUnits.wdCharacter, 7);

// Move the end position 7 characters.
rng.MoveEnd(Word.WdUnits.wdCharacter, 7);