Page.DropContainer method (Visio)

在頁面上建立一個新的容器 形狀 物件，將容器放置在指定的目標形狀周圍，並將目標形狀加入容器中。 會傳回容器圖形。

語法

expression。 DropContainer( _ObjectToDrop_ , _TargetShapes_ )

詞 一個代表 頁面 物件的變數。

參數

名稱	必要/選用	資料類型	描述
ObjectToDrop	必要	[未知]	要新增至頁面的容器圖形。 可以是 主物件、 MasterShortcut、 Shape 或 IDataObject 物件。
目標形狀	必要	[未知]	容器應該要包含的圖形。 可以是 Shape 或 Selection 物件。 這些圖形或選取範圍必須已在頁面上。

傳回值

圖形

註解

要傳遞 ObjectToDrop 參數的主物件，請使用 Documents.OpenEx 方法和 Application.GetBuiltInStencilFile 方法，並傳遞 visBuiltInStencilContainers 來開啟隱藏的內建容器模板。 接著使用 Masters.ItemU 屬性，從模板中取得你想要的特定容器。

透過 ObjectToDrop 所傳遞的 IDataObject 必須是由 Microsoft Visio 提供，而且需與 Visio 位於相同的處理程序空間。

如果 ObjectToDrop 並非 Visio 物件或不是容器，Visio 將傳回「無效的參數」錯誤。 如果傳遞的值為圖形但與此方法的內容意旨不符，Visio 則會傳回「無效的來源」錯誤。

如果 TargetShapes 參數為 Nothing，Visio 會將容器形狀置於頁面中央，且不含任何目標圖形。 如果指定的目標圖形並非頁面的最上層成員，Visio 將傳回「無效的參數」錯誤。

DropContainer 方法對應 Visio 使用者介面中的 Insert Container 指令。 (在 「插入 」標籤中，點選 容器。)

範例

以下 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 支援與意見反應。