通过

Document.Range 方法 (Word)

  • 项目

通过使用指定的起始位置和结束字符位置返回一个 Range 对象。

语法

表达式。范围 (开始、 结束)

expression 是必需的。 一个代表 Document 对象的变量。

参数

名称 必需/可选 数据类型 说明
Start 可选 Variant 开始字符位置。
End 可选 Variant 结束字符位置。

返回值

Range

示例

本示例为活动文档中的前 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 并将其设置为活动文档中的段落 2 到第 4 段，然后右对齐区域中的段落。

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 支持和反馈，获取有关如何接收支持和提供反馈的指南。