共用方式為

UIObject.SaveToFile 方法 (Visio)

  • 發行項

將 UIObject 物件所代表的使用者介面儲存在檔案中。

語法

expression。 SaveToFile( _FileName_ )

表達 代表 UIObject 物件的 變數。

參數

名稱 必要/選用 資料類型 描述
FileName 必要 字串 要在其中儲存 UIObject 物件之檔案的名稱

傳回值

無

註解

注意事項

從 Visio 2010 開始，Microsoft Office Fluent 使用者介面 (UI) 取代先前的階層式功能表、工具列和工作窗格系統。 您在舊版 Visio 中用來自訂使用者介面的 VBA 物件和成員仍可在 Visio 中使用，但其運作方式不同。

可以使用 UIObject 物件的 LoadFromFile 方法將檔案載入至應用程式。

範例

這個 Microsoft Visual Basic for Applications (VBA) 巨集會顯示如何儲存自訂使用者介面檔案 (.vsu)。 它不會操作任何 Visio 功能表或功能表項目。 執行此巨集之前，請將 path 變更為您要儲存檔案的位置，並且將 filename 變更為您要指派之檔案的名稱。

 
Public Sub SaveMenusToFile_Example() 
 
 Dim vsoUIObject As Visio.UIObject 
 Dim strPath As String 
 
 'Get the Menus object from Visio. 
 Set vsoUIObject = Visio.Application.BuiltInMenus 
 
 'Save the Menus object to a file. 
 strPath = "path\filename.vsu " 
 vsoUIObject.SaveToFile (strPath) 
 MsgBox ("Menus successfully saved to " & strPath) 
 
End Sub

支援和意見反應

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