Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Представляет текущий выделенный фрагмент в окне или области. Выделение обозначает либо выделенную область публикации, либо курсор, если ничего в публикации не выделено. В каждой области окна публикации может быть только один объект выделения , и только один объект выделения может быть активным во всем приложении.
Примечания
Используйте свойство Document.Selection для возврата объекта Selection . Если со свойством "Выделение " не используется ограничитель объектов, Microsoft Publisher возвращает выделенный фрагмент из активной области активного окна публикации.
Пример
В следующем примере копируется текущий выделенный фрагмент из активной публикации.
Sub CopySelection()
Selection.ShapeRange.Copy
End Sub
В приведенном ниже примере определяется тип выбранного элемента и, если это автофигура, заливка первой фигуры в выделении цветом. В этом примере предполагается, что в активной публикации выбран по крайней мере один элемент.
Sub SelectedShape()
If Selection.Type = pbSelectionShape Then
Selection.ShapeRange.Item(1).Fill.ForeColor _
.RGB = RGB(Red:=200, Green:=20, Blue:=255)
End If
End Sub
В следующем примере выделенный фрагмент копируется и вставляется в первую фигуру на второй странице активной публикации.
Sub CopyPasteSelection()
Selection.TextRange.Copy
With ActiveDocument.Pages(2).Shapes(1).TextFrame.TextRange
.Collapse Direction:=pbCollapseEnd
.InsertAfter NewText:=vbLf
.Paste
End With
End Sub
Методы
Свойства
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.