Compartilhar via

Método UIObject.LoadFromFile (Visio)

Carrega um objeto UIObject de aplicação do Microsoft Visio a partir de um ficheiro.

Sintaxe

expression. LoadFromFile( _FileName_ )

expressão Uma variável que representa um objeto UIObject .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
FileName Obrigatório String O nome do arquivo a ser carregado.

Valor de retorno

Nada

Comentários

Observação

A partir do Visio 2010, a interface de utilizador (IU) fluente do Microsoft Office substituiu o sistema anterior de menus em camadas, barras de ferramentas e painéis de tarefas. Os objetos VBA e os membros que utilizou para personalizar a interface de utilizador em versões anteriores do Visio ainda estão disponíveis no Visio, mas funcionam de forma diferente.

Você deve usar o método SaveToFile para salvar um objeto UIObject em um arquivo que o método LoadFromFile pode carregar.

Exemplo

Esta macro do Microsoft Visual Basic for Applications (VBA) mostra como salvar e carregar um arquivo de interface de usuário personalizado (.vsu). Ela não manipula menus ou itens de menu.

Antes de executar este código, substitua path\filename pelo caminho completo para e o nome de um ficheiro .vsu válido no seu computador.

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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.

  • Last updated on