Table of contents
TOC
Recolher sumário
Expandir sumário

Propriedade Document.CustomToolbars (Visio)Document.CustomToolbars Property (Visio)

office 365 dev account|Última Atualização: 22/03/2018
|
2 Colaboradores

Obtém um objeto UIObject que representa as barras de ferramentas personalizadas atuais e barras de status de um objeto Document . Somente leitura.Gets a UIObject object that represents the current custom toolbars and status bars of a Document object. Read-only.

SintaxeSyntax

expressão . CustomToolbarsexpression . CustomToolbars

expressão Uma variável que representa um objeto Document .expression A variable that represents a Document object.

Valor retornadoReturn Value

UIObjectUIObject

ComentáriosRemarks

Observação Iniciando com o Visio, a Microsoft Office Fluent interface do usuário (UI) substitui o sistema anterior de camadas de menus, barras de ferramentas e painéis de tarefas. Objetos do VBA e membros que você usou para personalizar a interface do usuário nas versões anteriores do Visio ainda estão disponíveis no Visio, mas eles funcionam de maneira diferente.Note Starting with Visio, the Microsoft Office Fluent user interface (UI) replaces the previous system of layered menus, toolbars, and task panes. VBA objects and members that you used to customize the user interface in previous versions of Visio are still available in Visio, but they function differently.

Se as barras de ferramentas do Microsoft Visio e barras de status não foram personalizadas, por meio de programação em uma solução Visio ou na interface do usuário, a propriedade CustomToolbars retornará Nothing .If Microsoft Visio toolbars and status bars have not been customized, either programmatically, by a Visio solution, or in the user interface, the CustomToolbars property returns Nothing .

ExemploExample

Esta macro do VBA (Microsoft Visual Basic for Applications) mostra como obter a interface do usuário ativa atual do seu documento sem substituir a interface personalizada ao nível do aplicativo. Você terá que escrever código adicional para adicionar os seus itens personalizados de interface de usuário.This Microsoft Visual Basic for Applications (VBA) macro shows how to get the currently active user interface (UI) for your document without replacing the application-level custom UI. You must write additional code to add your custom UI items.

Sub CustomToolbars_Example() 

 Dim vsoUIObject As Visio.UIObject 

 'Check whether there are custom toolbars bound to the document. 
 If ThisDocument.CustomToolbars Is Nothing Then 

 'If not, check whether there are custom toolbars bound to the application. 
 If Visio.Application.CustomToolbars Is Nothing Then 

 'If not, use the Visio built-in toolbars. 
 Set vsoUIObject = Visio.Application.BuiltInToolbars(0) 
 MsgBox "Using Built-In Toolbars", 0 

 Else 

 'If there are existing Visio application-level custom toolbars, use them. 
 Set vsoUIObject = Visio.Application.CustomToolbars 
 MsgBox "Using Custom Toolbars", 0 

 End If 

 Else 

 'Use the existing custom toolbars. 
 Set vsoUIObject = ThisDocument.CustomToolbars 
 MsgBox "Using Custom Toolbars", 0 

 End If 

End Sub
© 2018 Microsoft