Documents.Add 方法 (Visio)

將新的 Document 物件加入到 Documents 集合。

語法

運算式。新增 (FileName)

表達 代表 Documents 物件的變數。

參數

名稱	必要/選用	資料類型	描述
FileName	必要	字串	要加入的檔案類型或檔案名;如果您未包含路徑，Visio 會搜尋 Application 物件的TemplatePaths 屬性中指定的資料夾或資料夾，以及所有已發佈的範本，包括已發佈的協力廠商範本。

傳回值

文件

註解

如果不要根據任何範本來建立新的繪圖，請將長度為零的字串 ("") 傳遞給 Add 方法。

若要根據另一個檔案建立新的繪圖，例如範本，請將原始檔案的檔案名傳遞至 Add 方法。 Visio 會開啟樣板工作區一部分的樣板，並將樣式和其他與範本相關聯的設定複製到新檔。 如果範本檔案名無效，則不會傳回任何檔，而且會產生錯誤。

若不要根據任何樣板來建立新的樣板，請傳遞 ("vss")。

注意事項

將檔案名當做引數傳遞至 Add 方法相當於開啟範本之類的檔案，其中會建立新的空白繪圖，其中包含從原始複製的內容。

範例

下列巨集將示範如何將 Document 物件 (例如範本、樣板及繪圖) 加入到 Documents 集合中。

在執行這個巨集之前，請將 Myfile.vsd 取代為有效的 .vsd 檔。

Public Sub AddDocument_Example() 
 
 Dim vsoDocument As Visio.Document 
 
 'Add a Document object based on the Basic Diagram template. 
 Set vsoDocument = Documents.Add("Basic Diagram.vst") 
 
 'Add a Document object based on a drawing (creates a copy of the drawing). 
 Set vsoDocument = Documents.Add("Myfile.vsd ") 
 
 'Add a Document object based on a stencil (creates a copy of the stencil). 
 Set vsoDocument = Documents.Add("Basic Shapes.vss") 
 
 'Add a Document object based on no template. 
 Set vsoDocument = Documents.Add("") 
 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。