Document.Range メソッド (Word)

使用して指定された開始位置と終了位置では、 Range オブジェクトを取得します。

構文

式。範囲 (開始、 終了)

expression 必須です。 Document オブジェクトを表す変数を指定します。

パラメーター

戻り値

範囲

例

次の使用例は、作業中の文書の最初の 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

次の使用例は、作業中の文書の 2 から 4 の段落に変数 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 のサポートおよびフィードバックを参照してください。