Метод Range.MoveEndUntil (Word)
Перемещает конечную позицию указанного диапазона до тех пор, пока в документе не будут найдены какие-либо из указанных символов. Если в документе выполняется движение вперед, диапазон расширяется.
Синтаксис
выражение. MoveEndUntil( _Cset_ , _Count_ )
выражение (обязательно). Переменная, представляющая объект Range .
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| Cset | Обязательный | Variant | Один или несколько символов. Этот аргумент учитывает регистр. |
| Count | Необязательный | Variant | Максимальное число символов, на которое перемещается указанный диапазон. Может быть числом или константой wdForward или wdBackward . Если count является положительным числом, диапазон перемещается вперед в документе. Если это отрицательное число, диапазон перемещается в обратном направлении. Значение по умолчанию — wdForward. |
Замечания
Этот метод возвращает число символов, на которое перемещена конечная позиция указанного диапазона в виде значения Long . Если значение Count больше 0 (ноль), этот метод возвращает количество перемещенных символов плюс 1. Если значение Count меньше 0 (ноль), этот метод возвращает количество перемещенных символов минус 1. Если символы Cset не найдены, диапазон не изменяется и метод возвращает значение 0 (ноль). Если конечная позиция перемещается назад в точку, которая предшествует исходной начальной позиции, начальная позиция устанавливается в новую конечную позицию.
Пример
В этом примере выделенный текст в документе расширяется до тех пор, пока не будет найдена буква "a". Затем в примере выделенная область расширяется на один символ, чтобы включить букву "a".
With Selection.Range
.MoveEndUntil Cset:="a", Count:=wdForward
.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend
End With
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.