Application.CustomToolbars property (Visio)
Gets a UIObject object that represents the current custom toolbars and status bars of an Application object. Read-only.
Note
Starting with Visio 2010, the Microsoft Office Fluent user interface (UI) replaced 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.
Syntax
expression.CustomToolbars
expression A variable that represents an Application object.
Return value
UIObject
Remarks
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.
Example
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
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.
피드백
https://aka.ms/ContentUserFeedback
출시 예정: 2024년 내내 콘텐츠에 대한 피드백 메커니즘으로 GitHub 문제를 단계적으로 폐지하고 이를 새로운 피드백 시스템으로 바꿀 예정입니다. 자세한 내용은 다음을 참조하세요.다음에 대한 사용자 의견 제출 및 보기