Porady: Programowane zwijanie zakresów lub zaznaczenia w dokumentach

Artykuł
06/10/2015

Jeśli pracujesz z Range lub Selection obiektu, możesz chcieć zmienić wybór, aby punkt wstawiania przed wstawieniem tekstu, aby uniknąć zastępowania istniejącego tekstu.Obie Range i Selection obiekty mają Collapse metoda, która korzysta z WdCollapseDirection wartości wyliczenia:

wdCollapseStartZawęża zaznaczenie do początku zaznaczenia.Jest to wartość domyślna, jeśli nie określisz wartości wyliczenia.
wdCollapseEndZawęża zaznaczenie do końca tego fragmentu.

Zastosowanie: Informacje przedstawione w tym temacie mają zastosowanie do projektów na poziomie dokumentu i aplikacji obsługiwanych w programach Word 2013 i Word 2010. Aby uzyskać więcej informacji, zobacz Funkcje dostępne w aplikacjach pakietu Office i typ projektu.

Aby zwinąć zakres i Wstaw nowy tekst

Tworzenie Range obiekt, który składa się z pierwszego akapitu w dokumencie.

Poniższy przykład kodu służy dostosowywania poziomie dokumentu.

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

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

Poniższy przykład kodu, można w poziomie aplikacji dodatek.Ten kod używa aktywnego dokumentu.

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

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

Użycie wdCollapseStart wartość wyliczenia, aby zwinąć zakres.

rng.Collapse(Word.WdCollapseDirection.wdCollapseStart)

rng.Collapse(Word.WdCollapseDirection.wdCollapseStart);

Wstaw nowy tekst.

rng.Text = " New Text "

rng.Text = " New Text ";

Wybierz Range.
```
rng.Select()
```
```
rng.Select();
```

Jeśli korzystasz z wdCollapseEnd wartość wyliczenie, tekst jest wstawiany na początku ust.

rng.Collapse(Word.WdCollapseDirection.wdCollapseEnd)

rng.Collapse(Word.WdCollapseDirection.wdCollapseEnd);

Można by oczekiwać, że wstawianie nowe zdanie będzie ją wstawić przed znacznik akapitu, ale to nie przypadek, ponieważ oryginalny zakres zawiera znacznik akapitu.Aby uzyskać więcej informacji, zobacz Porady: Programowane wykluczanie znaczników akapitu podczas tworzenia zakresów.

Przykład dostosowywania poziomie dokumentu

Aby zwinąć zakres w dostosowania poziomu dokumentu

Poniższy przykład pokazuje pełną metody dostosowywania poziomie dokumentu.Aby użyć tego kodu, należy uruchomić go z ThisDocument klasy do projektu.

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; 

rng.Collapse(Word.WdCollapseDirection.wdCollapseStart); 

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

Poziom aplikacji dodatek przykład

Aby zwinąć zakres w poziomie aplikacji dodatek

Poniższy przykład pokazuje pełną metody na poziomie aplikacji dodatek.Aby użyć tego kodu, należy uruchomić go z ThisAddIn klasy do projektu.

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;

rng.Collapse(Word.WdCollapseDirection.wdCollapseStart);

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