Метод Selection.MoveLeft (Word)
Перемещает выделенный фрагмент влево и возвращает количество перемещенных единиц.
Синтаксис
выражение. MoveLeft
( _Unit_
, _Count_
, _Extend_
)
выражение (обязательно). Переменная, представляющая объект Selection .
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
Единицы | Необязательный | WdUnits | Единица перемещения выделенного фрагмента. Значение по умолчанию — wdCharacter. |
Count | Необязательный | Variant | Количество единиц, которые нужно переместить. Значение по умолчанию равно 1. |
Extend | Необязательный | Variant | Может быть wdMove или wdExtend. Если используется wdMove , выделение сворачивается в конечную точку и перемещается влево. Если используется wdExtend , выделение расширяется слева. Значение по умолчанию — wdMove. |
Замечания
Если параметр Unit имеет значение 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 и обратная связь.