Word) (Document.Range 方法

使用指定的開始和結束字元位置會傳回 Range 物件。

語法

運算式。範圍 (開始時間、 結束)

需要 expression。 代表 Document 物件的變數。

參數

名稱	必要/選用	資料類型	描述
Start	選用	Variant	開始字元位置。
End	選用	Variant	結束字元位置。

傳回值

範圍

範例

這則範例會將粗體格式套用至使用中文件的前 10 個字元。

Sub DocumentRange() 
 ActiveDocument.Range(Start:=0, End:=10).Bold = True 
End Sub

這則範例會建立一個範圍 (從使用中文件的開頭開始，到游標位置結束)，然後將該範圍內的所有字元變更為大寫。

Sub DocumentRange2() 
 Dim r As Range 
 Set r = ActiveDocument.Range(Start:=0, End:=Selection.End) 
 r.Case = wdUpperCase 
End Sub

本範例會在使用中檔內，將變數 myRange 建立並設定為第二到第四個段落，然後以滑鼠右鍵對齊範圍中的段落。

Sub DocumentRange3() 
 Dim aDoc As Document 
 Dim myRange As Range 
 Set aDoc = ActiveDocument 
 If aDoc.Paragraphs.Count >= 6 Then 
 Set myRange = aDoc.Range(aDoc.Paragraphs(2).Range.Start, _ 
 aDoc.Paragraphs(4).Range.End) 
 myRange.Paragraphs.Alignment = wdAlignParagraphRight 
 End If 
End Sub

另請參閱

Document 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。