Поделиться через


Метод Selection.SelectCurrentTabs (Word)

Расширяет выделение вперед до тех пор, пока не появится абзац с разными концами табуляции.

Синтаксис

выражение. SelectCurrentTabs

выражение (обязательно). Переменная, представляющая объект Selection .

Пример

В этом примере выбирается второй абзац в активном документе, а затем выделение расширяется, чтобы включить все остальные абзацы с одинаковыми табуляции.

Set myRange = ActiveDocument.Paragraphs(2).Range 
myRange.Select 
Selection.SelectCurrentTabs

В этом примере выбираются абзацы с одинаковыми табуляции и извлекаются позиции первой табуляции. В примере выделение перемещается в следующий диапазон абзацев с одинаковыми табуляции. Затем в этом примере параметр табуляции добавляется из первой группы абзацев в текущий выделенный фрагмент.

With Selection 
 .SelectCurrentTabs 
 pos = .Paragraphs.TabStops(1).Position 
 .Collapse Direction:=wdCollapseEnd 
 .SelectCurrentTabs 
 .Paragraphs.TabStops.Add Position:=pos 
End With

См. также

Объект selection

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.