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
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。