Selection.MoveRight メソッド (Word)

選択範囲を右方向に移動し、移動した単位数を返します。

構文

expression. MoveRight( _Unit_ , _Count_ , _Extend_ )

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

パラメーター

名前 必須 / オプション データ型 説明
Unit 省略可能 WdUnits 選択範囲を移動する単位を指定します。既定値は wdCharacter です。
Count 省略可能 バリアント型 (Variant) 選択範囲を移動する単位を指定します。 既定値は 1 です。
Extend 省略可能 バリアント型 (Variant) WdMove または wdExtend のいずれかを指定できます。 定数 wdMove を指定すると、範囲の選択が解除され、カーソル位置が終了位置から右方向に移動します。 wdExtend を使用すると、選択範囲は右に拡張されます。 既定値は wdMove です。

戻り値

Long

注釈

引数 Unit に定数 wdCell を指定した場合、引数 Extend に指定できるのは定数 wdMove だけです。

次の例では、選択範囲を解除してカーソル位置を直前のフィールドに移動し、フィールドを選択します。

With Selection 
 Set MyRange = .GoTo(wdGoToField, wdGoToPrevious) 
 .MoveRight Unit:=wdWord, Count:=1, Extend:=wdExtend 
 If Selection.Fields.Count = 1 Then Selection.Fields(1).Update 
End With

次の例では、選択範囲を 1 文字分右に移動します。 移動に成功した場合、MoveRight は 1 を返します。

If Selection.MoveRight = 1 Then MsgBox "Move was successful"

次の例では、選択範囲を解除してカーソル位置を次のセルに移動します。

If Selection.Information(wdWithInTable) = True Then 
 Selection.MoveRight Unit:=wdCell, Count:=1, Extend:=wdMove 
End If

関連項目

Selection オブジェクト

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

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