Range.MoveEndWhile メソッド (Word)
指定された文字のいずれかが文書内で検索されると、指定範囲の末尾の文字位置を移動します。
構文
expression. MoveEndWhile
( _Cset_
, _Count_
)
expression 必須です。 Range オブジェクトを表す変数を指定します。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
Cset | 必須 | バリアント型 (Variant) | 1 文字または複数の文字を指定します。 この引数では大文字と小文字が区別されます。 |
Count | 省略可能 | バリアント型 (Variant) | 範囲が移動するが、文字の最大数です。 いくつかまたは、 wdForward または wdBackward は、定数です。 カウントが正の数値の場合は、範囲は、ドキュメントの前方に移動します。 負の数値の場合は、範囲は先頭方向に移動します。 既定値は wdForward です。 |
注釈
Cset に指定した任意の文字が見つかると、指定した範囲の終了位置が移動します。 このメソッドでは、 long 型 の値の範囲の終了位置を移動した文字数を返します。 Cset の文字が見つからない場合は、範囲は変更されず、メソッドは 0 (ゼロ) を返します。 終了位置は元の開始位置より前にあるポイントを後方に移動する場合は、開始位置が新しい終了位置に設定されます。
例
次の使用例は、スペースが検索されると、選択範囲の終了位置を末尾方向に移動します。
Selection.Range.MoveEndWhile Cset:=" ", Count:=wdForward
次の使用例は、引数 Count の値が 10 以下のときに "a" から "h" のいずれかの文字が検索されると、選択範囲の終了位置を末尾方向に移動します。
Selection.Range.MoveEndWhile Cset:="abcdefgh", Count:=10
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。