Visio) (Page.DropContainer 方法

在頁面上建立新容器 圖形 物件，將容器放置在指定的目標圖形周圍，並將目標圖形新增至容器。 會傳回容器圖形。

語法

expression。 DropContainer( _ObjectToDrop_ , _TargetShapes_ )

運算式 代表 Page 物件的變數。

參數

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

傳回值

圖形

註解

若要傳遞 ObjectToDrop 參數的 Master 物件，請使用 Documents.OpenEx 方法和 Application.GetBuiltInStencilFile 方法，傳遞至 visBuiltInStencilContainers，以開啟隱藏的內建容器樣板。 然後使用 Masters.ItemU 屬性從樣板中取得您想要的特定容器。

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

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

如果 TargetShapes 參數為 [無]，Visio 會將容器圖形放置在頁面中央，沒有任何目標圖形。 如果指定的目標圖形並非頁面的最上層成員，Visio 將傳回「無效的參數」錯誤。

DropContainer 方法對應至 Visio 使用者介面中的 [插入容器] 命令。 (在 [ 插入 ] 索引標籤上，按一下 [容器]。)

範例

下列 Visual Basic for Applications (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 支援與意見反應。

  • 上次更新時間：