Selection.StartIsActive プロパティ (Word)

True の 場合は、選択範囲の開始位置が有効。 値の取得と設定が可能なブール型 (Boolean) の値です。

構文

expression。 StartIsActive

式Selection オブジェクトを返す式。

注釈

選択範囲がカーソル位置で解除されない場合は、選択範囲の開始位置または終了位置のいずれかが有効になります。 EndKey、Extend (Characters 引数を使用)、HomeKey、MoveDown、MoveLeft、MoveRight、および MoveUp のメソッドを呼び出すと、選択範囲のアクティブな端が移動します。

このプロパティは、 Flags プロパティを wdSelStartActive 定数と共に使用することと同じです。 ただし、Flags プロパティを使用する場合はバイナリ処理が必要なため、StartIsActive プロパティを使用する場合より複雑になります。

例

次の使用例は、現在の選択範囲を隣接する次の 2 語まで拡大します。 現在選択されている文字列の選択状態を拡大処理の実行中も維持するには、その選択範囲の終了位置を最初に有効にします。 たとえば、この段落の最初の 3 語が選択されている場合に、その選択範囲の開始位置が有効になっていると、MoveRight メソッドを呼び出したときに最初の 2 語は選択解除されます。

With Selection 
 .StartIsActive = False 
 .MoveRight Unit:=wdWord, Count:=2, Extend:=wdExtend 
End With

ここでは、 Flags プロパティの使用例と同じです。 この問題ができるだけ無効にするため、 Flags プロパティの設定に関係のない値で上書きすることです。

With Selection 
 If (.Flags And wdSelStartActive) = wdSelStartActive Then _ 
 .Flags = wdSelReplace 
 .MoveRight Unit:=wdWord, Count:=2, Extend:=wdExtend 
End With

次例は、同じ選択範囲のどの端がアクティブかを確認する必要がある、 MoveEnd メソッドを使用します。

With Selection 
 .MoveEnd Unit:=wdWord, Count:=2 
End With

関連項目

Selection オブジェクト

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

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

  • Last updated on