Selection.MoveRight メソッド (Word)Selection.MoveRight method (Word)

選択範囲を右方向に移動し、移動した単位数を返します。Moves the selection to the right and returns the number of units it has been moved.

構文Syntax

expression.expression. MoveRight( _Unit_ , _Count_ , _Extend_ )

expression は必須です。expression Required. Selection オブジェクトを表す変数を指定します。A variable that represents a Selection object.

パラメーターParameters

名前Name 必須 / オプションRequired/Optional データ型Data type 説明Description
UnitUnit 省略可能Optional WdUnitsWdUnits 選択範囲を移動する単位を指定します。既定値は定数 wdCharacter です。The unit by which the selection is to be moved.The default value is wdCharacter.
CountCount 省略可能Optional VariantVariant 選択範囲を移動する単位を指定します。The number of units the selection is to be moved. 既定値は 1 です。The default value is 1.
ExtendExtend 省略可能Optional VariantVariant wdMove または wdExtend のどちらかを指定できます。Can be either wdMove or wdExtend. wdMove を使用すると、選択範囲はエンドポイント方向に折りたたまれて右に移動します。If wdMove is used, the selection is collapsed to the endpoint and moved to the right. wdExtend を使用すると、選択範囲は右に拡張されます。If wdExtend is used, the selection is extended to the right. 既定値は wdMove です。The default value is wdMove.

戻り値Return value

LongLong

解説Remarks

引数 Unit に定数 wdCell を指定した場合、引数 Extend に指定できるのは定数 wdMove だけです。When the Unit is wdCell, the Extend argument can only be wdMove.

Example

次の例では、選択範囲を解除してカーソル位置を直前のフィールドに移動し、フィールドを選択します。This example moves the selection before the previous field and then selects the field.

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 文字分右に移動します。This example moves the selection one character to the right. 移動に成功した場合、MoveRight は 1 を返します。If the move is successful, MoveRight returns 1.

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

次の例では、選択範囲を解除してカーソル位置を次のセルに移動します。This example moves the selection to the next table cell.

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

関連項目See also

Selection オブジェクトSelection Object

サポートとフィードバックSupport and feedback

Office VBA またはこの説明書に関するご質問やフィードバックがありますか?Have questions or feedback about Office VBA or this documentation? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.