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 のサポートおよびフィードバックを参照してください。

  • Last updated on