Como redefinir intervalos em documentos do Word programaticamente

Artigo
02/25/2013

Use o método de SetRange para redimensionar um intervalo existente em um documento Microsoft Office Word.

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 2013 e Word 2010. Para obter mais informações, consulte Recursos disponíveis pelo aplicativo do Office e o tipo de projeto.

para redefinir um intervalo existente

Definir um intervalo inicial que começa com os sete primeiros caracteres no documento.

O exemplo de código pode ser usado em uma personalização da nível.

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 pode ser usado em um suplemento ao aplicativo.Esse código 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 SetRange para iniciar o intervalo na segunda sentença e para terminá-lo no final da primeira sentença.

rng.SetRange(Start:=Me.Sentences(2).Start, End:=Me.Sentences(5).End)

rng.SetRange(this.Sentences[2].Start, this.Sentences[5].End);

Exemplo da Nível de personalização

Para redefinir um intervalo existente em uma personalização da nível

O exemplo a seguir mostra o exemplo completo para uma personalização da nível.Para usar este código, ele execução da classe de ThisDocument em seu projeto.

Dim rng As Word.Range = Me.Range(Start:=0, End:=7)

' Reset the existing Range.
rng.SetRange(Start:=Me.Sentences(2).Start, End:=Me.Sentences(5).End)
rng.Select()

object start = 0; 
object end = 7; 
Word.Range rng = this.Range(ref start,ref end); 

// Reset the existing Range. 
rng.SetRange(this.Sentences[2].Start, this.Sentences[5].End); 
rng.Select();

Exemplo do suplemento ao Nível

Para redefinir um intervalo existente em um suplemento ao nível

O exemplo a seguir mostra o exemplo completo para um suplemento ao aplicativo.Para usar este código, ele execução da classe de ThisAddIn em seu projeto.

Dim rng As Word.Range = Me.Application.ActiveDocument.Range(Start:=0, End:=7)

' Reset the existing Range.
rng.SetRange(Start:=Me.Application.ActiveDocument.Sentences(2).Start, _
    End:=Me.Application.ActiveDocument.Sentences(5).End)
rng.Select()

Word.Range rng = this.Application.ActiveDocument.Range(0, 7);

// Reset the existing Range. 
rng.SetRange(this.Application.ActiveDocument.Sentences[2].Start,
    this.Application.ActiveDocument.Sentences[5].End);
rng.Select();

Consulte também

Tarefas

Como estender intervalos em documentos programaticamente

Como definir e selecionar intervalos em documentos programaticamente

Como recuperar caracteres iniciais e finais em intervalos programaticamente

Como recolher intervalos ou seleções em documentos programaticamente

Compartilhar via