Is it a bug in Inventor professional 2022 ?
Not applicable
05-04-2021
12:49 PM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
What is the reason? (In Inventor Professional 2022)
In (VBA Editor F5), it runs
Doesn't run in (Customize ShortCut Key 4)
What is the reason?
Public Sub CollapseAll() 'Set ShortCut Key = 4
Dim oCommandMgr As CommandManager
Set oCommandMgr = ThisApplication.CommandManager
Dim oControlDef As ControlDefinition
Set oControlDef = oCommandMgr.ControlDefinitions.Item("AppBrowserCollapseAllCmd")
Call oControlDef.Execute
ThisApplication.ActiveDocument.Update
End Sub