Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Расширяет выделение вперед до тех пор, пока не появится абзац с разными концами табуляции.
Синтаксис
выражение. 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
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.