Como: Recolher intervalos ou seleções em documentos

Artigo
08/25/2010

Se aplica a
As informações contidas neste tópico se aplicam apenas às especificado Ferramentas do Visual Studio para o Office projetos e as versões do Microsoft Office. Tipo de Projeto Projetos de nível de documento Projetos de nível de aplicativo Versão do Microsoft Office Word 2003 Word 2007 For more information, see Recursos disponíveis pelo aplicativo e o tipo de projeto.

As informações contidas neste tópico se aplicam apenas às especificado Ferramentas do Visual Studio para o Office projetos e as versões do Microsoft Office.

Tipo de Projeto

Projetos de nível de documento
Projetos de nível de aplicativo

Versão do Microsoft Office

Word 2003
Word 2007

For more information, see Recursos disponíveis pelo aplicativo e o tipo de projeto.

Se você estiver trabalhando com um objeto de Range ou Selection, convém alterar a seleção para um ponto de inserção antes de inserir texto, para evitar a substituição texto existente.Ambos os objetos de Range e Selection tem um método de Collapse , que faz uso dos valores de enumeração WdCollapseDirection:

wdCollapseStart - recolhe a seleção até o início da seleção.Este é o padrão se você não especificar um valor de enumeração.
wdCollapseEnd - recolhe a seleção até o final da seleção.

Para recolher um intervalo e inserir o novo texto

Criar um objeto Range que consiste o primeiro parágrafo do documento.

O exemplo de código a seguir pode ser usado em uma personalização de nível de documento.
```
Dim rng As Word.Range = Me.Paragraphs(1).Range
```
```
Word.Range rng = this.Paragraphs[1].Range; 
```
O exemplo de código a seguir pode ser usado em um nível de aplicativo Adicionar - in.Este código usa o documento ativo.
```
Dim rng As Word.Range = Me.Application.ActiveDocument.Paragraphs(1).Range
```
```
Word.Range rng = this.Application.ActiveDocument.Paragraphs[1].Range;
```

Use o valor de enumeração wdCollapseStart para recolher o intervalo.

rng.Collapse(Word.WdCollapseDirection.wdCollapseStart)

object direction = Word.WdCollapseDirection.wdCollapseStart;
rng.Collapse(ref direction);

Inserir o novo texto.

rng.Text = " New Text "

rng.Text = " New Text ";

Selecionar o Range.
```
rng.Select()
```
```
rng.Select();
```

Se você usar o valor de enumeração wdCollapseEnd, o texto é inserido no início do parágrafo seguinte.

rng.Collapse(Word.WdCollapseDirection.wdCollapseEnd)

direction = Word.WdCollapseDirection.wdCollapseEnd;
rng.Collapse(ref direction);

Você pode esperar que inserir uma Novo sentença deve inseri-lo antes do marcador de parágrafo, mas que é o maiúscminúsc de não porque o intervalo original inclui o marcador de parágrafo.For more information, see Como: Excluir marcas de parágrafo ao criar intervalos.

Exemplo de personalização de nível de documento

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

O exemplo a seguir mostra Concluir método para uma personalização de nível de documento.Para usar esse código, execute-de a classe ThisDocument no seu projeto.

Dim rng As Word.Range = Me.Paragraphs(1).Range

rng.Collapse(Word.WdCollapseDirection.wdCollapseStart)

rng.Text = " New Text "
rng.Select()

Word.Range rng = this.Paragraphs[1].Range; 

object direction = Word.WdCollapseDirection.wdCollapseStart;
rng.Collapse(ref direction); 

rng.Text = " New Text ";
rng.Select();

Nível de aplicativo Adicionar - exemplo

Para recolher um intervalo em um aplicativo-nível Adicionar - in

O exemplo a seguir mostra Concluir método para um suplemento em nível de aplicativo.Para usar esse código, execute-de a classe ThisAddIn no seu projeto.

Dim rng As Word.Range = Me.Application.ActiveDocument.Paragraphs(1).Range

rng.Collapse(Word.WdCollapseDirection.wdCollapseStart)

rng.Text = " New Text "
rng.Select()

Word.Range rng = this.Application.ActiveDocument.Paragraphs[1].Range;

object direction = Word.WdCollapseDirection.wdCollapseStart;
rng.Collapse(ref direction);

rng.Text = " New Text ";
rng.Select();