HOW TO：在 Word 文件中重設範圍
更新：2007 年 11 月
適用於 |
|---|
本主題中的資訊僅適用於指定的 Visual Studio Tools for Office 專案和 Microsoft Office 版本。 專案類型
Microsoft Office 版本
如需詳細資訊，請參閱依應用程式和專案類型提供的功能。 |
使用 SetRange 方法，可以調整 Microsoft Office Word 文件中現有範圍的大小。
若要重設現有範圍
設定以文件中前七個字元開頭的初始範圍。
下列程式碼範例可以用於文件層級自訂中。
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);下列程式碼範例可以用於應用程式層級的增益集中。這個程式碼使用主動式文件 (Active Document)。
Dim rng As Word.Range = Me.Application.ActiveDocument.Range(Start:=0, End:=7)object start = 0; object end = 7; Word.Range rng = this.Application.ActiveDocument.Range( ref start, ref end);使用 SetRange 從第二個句子開始設定這個範圍，一直到第五個句子的結尾結束。
rng.SetRange(Start:=Me.Sentences(2).Start, End:=Me.Sentences(5).End)rng.SetRange(this.Sentences[2].Start, this.Sentences[5].End);
文件層級自訂範例
若要重設文件層級自訂中的現有範圍
下列範例顯示文件層級自訂的完整範例。若要使用這個程式碼，請從專案中的 ThisDocument 類別 (Class) 加以執行。
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();
應用程式層級增益集範例
若要重設應用程式層級增益集中的現有範圍
下列範例顯示應用程式層級增益集的完整範例。若要使用這個程式碼，請從專案中的 ThisAddIn 類別加以執行。
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()object start = 0; object end = 7; Word.Range rng = this.Application.ActiveDocument.Range( ref start, ref end); // Reset the existing Range. rng.SetRange(this.Application.ActiveDocument.Sentences[2].Start, this.Application.ActiveDocument.Sentences[5].End); rng.Select();