Примечание
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Отменяет выделение всех, кроме последнего выделенного текста, если выделенная область содержит несколько несвязанных выделенных фрагментов.
Синтаксис
выражение. ShrinkDiscontiguousSelection
выражение (обязательно). Переменная, представляющая объект Selection .
Пример
Этот пример отменяет выделение всех, кроме последнего выделенного текста, и форматов с полужирным и небольшими заголовок текста, оставшегося в выделенном фрагменте. В этом примере предполагается, что в документе есть несколько вариантов выбора.
Sub ShrinkMultipleSelection()
With Selection
.ShrinkDiscontiguousSelection
.Font.Bold = True
.Font.SmallCaps = True
End With
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.