Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Перемещает выделенный фрагмент влево и возвращает количество единиц измерения, на которое он был перемещен.
Синтаксис
выражение.
MoveLeft( _Unit_ , _Count_ , _Extend_ )
выражение (обязательно). Переменная, представляющая объект выделения .
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| Единица измерения | Необязательный | WdUnits | Единица, на которую необходимо переместить выделение. Значение по умолчанию — wdCharacter. |
| Count | Необязательный | Variant | Количество единиц, на которое нужно переместить. Значение по умолчанию равно 1. |
| Extend | Необязательный | Variant | Может принимать значение wdMove или wdExtend. Если используется команда wdMove , выделенный фрагмент сворачивается в конечную точку и перемещается влево. Если используется параметр wdExtended , выделенный фрагмент расширяется влево. Значение по умолчанию: wdMove. |
Примечания
Если единицей является wdCell, аргумент Extend будет только wdMove.
Пример
В этом примере выделенный фрагмент перемещается на один знак влево. Если перемещение выполнено успешно, функция MoveLeft возвращает значение 1.
If Selection.MoveLeft = 1 Then MsgBox "Move was successful"
В этом примере включается заливка выбранного поля, вставляется поле DATE, а затем выделенное поле перемещается влево для выбора поля.
ActiveDocument.ActiveWindow.View.FieldShading = _
wdFieldShadingWhenSelected
With Selection
.Fields.Add Range:=Selection.Range, Type:=wdFieldDate
.MoveLeft Unit:=wdWord, Count:=1
End With
В этом примере выбор перемещается в предыдущую ячейку таблицы.
If Selection.Information(wdWithInTable) = True Then
Selection.MoveLeft Unit:=wdCell, Count:=1, Extend:=wdMove
End If
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.