Свойство Selection.StartIsActive (Word)
Значение True , если начало выделения активно. Для чтения и записи, Boolean.
Синтаксис
выражение. StartIsActive
Выражение Выражение, возвращающее объект Selection .
Замечания
Если выделение не свернуто до точки вставки, активен либо начало, либо конец выделения. Активный конец выделения перемещается при вызове следующих методов: EndKey, Extend (с аргументом Characters), HomeKey, MoveDown, MoveLeft, MoveRight и MoveUp.
Это свойство эквивалентно использованию свойства Flags с константой wdSelStartActive . Однако для использования свойства Flags требуются двоичные операции, которые являются более сложными, чем использование свойства StartIsActive .
Пример
В этом примере текущий выделенный фрагмент расширяется до следующих двух слов. Чтобы убедиться, что любой выделенный в данный момент текст остается выделенным во время расширения, сначала активируется конец выделенного фрагмента. (Например, если первые три слова этого абзаца были выбраны, но начало выделения было активным, вызов метода MoveRight отменял бы выделение первых двух слов.)
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
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.