Como: Estender a intervalos em documentos

Artigo
08/08/2011

Depois de definir um Range de objeto em um documento do Word de Microsoft Office, você alterar seus pontos inicial e final usando o MoveStart e MoveEnd métodos. O MoveStart e MoveEnd métodos utilizam os mesmos dois argumentos, Unit e Count. O Count argumento é o número de unidades para mover e o Unit argumento pode ser uma das seguintes WdUnits valores:

Aplicável a: As informações neste tópico se aplicam a projetos de nível de documento e projetos de nível de aplicativo para Word 2007 e Word 2010. Para obter mais informações, consulte Recursos disponíveis pelo aplicativo do Office e o tipo de projeto.

O exemplo a seguir define um intervalo de sete caracteres. Em seguida, move a posição inicial, os caracteres do intervalo de sete após a posição de início original. Como a posição final do intervalo também era sete caracteres após a posição inicial, o resultado é um intervalo que consiste em caracteres de zero. O código move os caracteres de sete posição final após a atual posição final.

Para estender um intervalo.

Defina um intervalo de caracteres. For more information, see Como: Definir e selecionar intervalos em documentos.

O exemplo de código a seguir pode ser usado em uma personalização em nível de documento.
```
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);
```
O exemplo de código a seguir pode ser usado em um suplemento em nível de aplicativo. Este exemplo usa o documento ativo.
```
Dim rng As Word.Range = Me.Application.ActiveDocument.Range(Start:=0, End:=7)
```
```
Word.Range rng = this.Application.ActiveDocument.Range(0, 7);
```

Use o MoveStart método da Range o objeto para mover a posição inicial do intervalo.

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

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

Use o MoveEnd método da Range o objeto para mover a posição final do intervalo.

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

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

Código de personalização de nível de documento

Para estender um intervalo em uma personalização em nível de documento

O exemplo a seguir mostra o código completo para uma personalização em nível de documento. Para usar esse código, executá-lo do ThisDocument classe no projeto.

' 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);

Suplemento em nível de aplicativo de código

Para estender um intervalo em um suplemento em nível de aplicativo

O exemplo a seguir mostra o código completo para um suplemento em nível de aplicativo. Para usar esse código, executá-lo do ThisAddIn classe no projeto.

' 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);