Page.DropContainer 方法 (Visio)

在頁面上建立新的容器 Shape 物件、將容器放在指定的靶心圖表形周圍，然後將靶心圖表形新增至容器。 會傳回容器圖形。

語法

expression。 DropContainer( _ObjectToDrop_ , _TargetShapes_ )

表達 代表 Page 物件的變數。

參數

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

傳回值

圖形

註解

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

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

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

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

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

範例

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