Cómo: Restablecer intervalos en documentos de Word mediante programación

Artículo
02/19/2013

Utilice el método SetRange para cambiar el tamaño de un rango existente en un documento de Microsoft Office Word.

Se aplica a: La información de este tema se aplica a los proyectos de nivel de documento y los proyectos de nivel de aplicación para Word 2013 y Word 2010. Para obtener más información, vea Características disponibles por aplicación y tipo de proyecto de Office.

Para restaurar un rango existente

Establezca un rango inicial que empiece por los siete primeros caracteres del documento.

El ejemplo de código siguiente se puede usar en una personalización de nivel 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); 
```
El ejemplo de código siguiente se puede usar en un complemento de nivel de aplicación.En este código se usa el documento activo.
```
Dim rng As Word.Range = Me.Application.ActiveDocument.Range(Start:=0, End:=7)
```
```
Word.Range rng = this.Application.ActiveDocument.Range(0, 7);
```

Utilice SetRange para iniciar el rango en la segunda frase y terminarlo al final de la quinta frase.

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

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

Ejemplo de personalización de nivel de documento

Para restablecer un rango existente en una personalización de nivel de documento

En el ejemplo siguiente se muestra el ejemplo completo de una personalización de nivel de documento.Para usar este código, ejecútelo desde la clase ThisDocument del proyecto.

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

Ejemplo de complemento de nivel de aplicación

Para restablecer un rango existente en un complemento de nivel de aplicación

En el ejemplo siguiente se muestra el ejemplo completo de un complemento de nivel de aplicación.Para usar este código, ejecútelo desde la clase ThisAddIn del proyecto.

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

Vea también

Tareas

Cómo: Ampliar intervalos en documentos mediante programación

Cómo: Definir y seleccionar intervalos en documentos mediante programación

Cómo: Recuperar los caracteres inicial y final de los intervalos mediante programación

Cómo: Contraer intervalos o selecciones en documentos mediante programación

Compartir a través de