通过

UIObject.SaveToFile 方法 (Visio)

  • 项目

将 UIObject 对象表示的用户界面保存在文件中。

语法

expression。 SaveToFile( _FileName_ )

表达 一个代表 UIObject 对象的变量。

参数

名称 必需/可选 数据类型 说明
FileName 必需 字符串 要在其中保存 UIObject 对象的文件的名称。

返回值

Nothing

注解

注意

从 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 支持和反馈，获取有关如何接收支持和提供反馈的指南。