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


Метод Page.DropContainer (Visio)

Создает объект container Shape на странице, помещает контейнер вокруг указанных целевых фигур и добавляет целевые фигуры в контейнер. Возвращает фигуру контейнера.

Синтаксис

выражение. DropContainer( _ObjectToDrop_ , _TargetShapes_ )

Выражение Переменная, представляющая объект Page .

Параметры

Имя Обязательный или необязательный Тип данных Описание
ObjectToDrop Обязательный [НЕИЗВЕСТНО] Фигура контейнера, добавляемая на страницу. Может быть объектом Master, MasterShortcut, Shape или IDataObject .
TargetShapes Обязательный [НЕИЗВЕСТНО] Фигуры, которые должен содержать контейнер. Может быть объектом Shape или Selection . Фигуры или выделенные элементы уже должны находиться на странице.

Возвращаемое значение

Shape

Замечания

Чтобы передать главный объект для параметра ObjectToDrop , используйте метод Documents.OpenEx и метод Application.GetBuiltInStencilFile , передав его visBuiltInStencilContainers, чтобы открыть скрытый встроенный набор элементов контейнера. Затем используйте свойство Masters.ItemU , чтобы получить нужный контейнер из набора элементов.

Объект IDataObject, который передается для ObjectToDrop, должен быть предоставлен Microsoft Visio и находиться в том же пространстве процесса, что и Visio.

Если ObjectToDrop не является объектом Visio или не является контейнером, Visio возвращает ошибку Недопустимый параметр. Если переданное значение является фигурой, которая не соответствует контексту метода, Visio возвращает ошибку "Недопустимый источник".

Если параметр TargetShapes имеет значение Nothing, Visio помещает фигуру контейнера в центр страницы без каких-либо целевых фигур. Если указанные целевые фигуры не являются элементами верхнего уровня страницы, Visio возвращает ошибку "Недопустимый параметр".

Метод DropContainer соответствует команде Вставка контейнера в пользовательском интерфейсе Visio. (На вкладке Вставка щелкните Контейнер.)

Пример

В следующем примере Visual Basic для приложений (VBA) показано, как использовать метод DropContainer для добавления контейнера из скрытого встроенного набора элементов контейнера на активную страницу, чтобы содержать выбранные фигуры или фигуры. Перед запуском этого макроса убедитесь, что на активной странице есть выделенная фигура (или выборка фигур).

Public Sub DropContainer_Example()

    Dim vsoDocument As Visio.Document
    Set vsoDocument = Application.Documents.OpenEx(Application.GetBuiltInStencilFile(visBuiltInStencilContainers, visMSUS), visOpenHidden)
    Application.ActivePage.DropContainer vsoDocument.Masters.ItemU("Container 1"), Application.ActiveWindow.Selection
    vsoDocument.Close
    
End Sub

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

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