Window.RangeFromPoint メソッド (Word)

  • [アーティクル]

画面位置の座標で指定された位置にある 指定範囲 または 図形 オブジェクトを返します。

構文

式。RangeFromPoint (x, y)

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

パラメーター

名前 必須 / オプション データ型 説明
x 必須 長整数型 (Long) 画面の左端からその位置までの水平方向の距離 (ピクセル単位) を指定します。
y 必須 長整数型 (Long) 画面の上端からその位置までの垂直方向の距離 (ピクセル単位) を指定します。

戻り値

Object

注釈

指定された座標で位置指定範囲または図形がない場合、メソッドは Nothing を返します。

例

この例では、新しい文書を作成し、5 つ星を追加します。 図形の画面上の位置を取得し、図形の中心であるかを計算します。 これらの座標を使用すると、例は、図形への参照を返すし、塗りつぶしの色を変更する、 RangeFromPoint メソッドを使用します。

Dim pLeft As Long 
Dim pTop As Long 
Dim pWidth As Long 
Dim pHeight As Long 
Dim newShape As Object 
Dim newDoc As New Document 
 
With newDoc 
 .Shapes.AddShape msoShape5pointStar, _ 
 288, 100, 100, 72 
 .ActiveWindow.GetPoint pLeft, pTop, _ 
 pWidth, pHeight, .Shapes(1) 
 Set newShape = .ActiveWindow.RangeFromPoint(pLeft _ 
 + pWidth * 0.5, pTop + pHeight * 0.5) 
 newShape.Fill.ForeColor.RGB = RGB(80, 160, 130) 
End With

関連項目

Window オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。