05-23-2018
10:55 PM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
05-23-2018
10:55 PM
Hoping that below iLogic code would help to select multiple nodes. Before running this code, make sure that selection is made browser node.
Sub Main()
Dim oDoc As DrawingDocument
oDoc = ThisApplication.ActiveDocument
Dim oTopBrowserNode As BrowserNode
oTopBrowserNode = oDoc.BrowserPanes.ActivePane.TopNode
Dim objColl As ObjectCollection
objColl = ThisApplication.TransientObjects.CreateObjectCollection
Call Get_SelectedNodes(oTopBrowserNode, objColl)
Dim oNode As BrowserNode
For Each oNode In objColl
oNode.Expanded = True
oNode.DoPreSelect()
oNode.DoSelect()
Dim oControlDef As ControlDefinition
oControlDef = ThisApplication.CommandManager.ControlDefinitions.Item("DrawingBodyHiddenLinesCtxCmd")
oControlDef.Execute2(True)
Next
End Sub
Sub Get_SelectedNodes(oTopBrowserNode As BrowserNode, ByRef objColl As ObjectCollection)
Dim oNode As BrowserNode
For Each oNode In oTopBrowserNode.BrowserNodes
If oNode.Selected = True Then
Call objColl.Add(oNode)
ElseIf oNode.BrowserNodes.Count > 0 Then
Call Get_SelectedNodes(oNode, objColl)
End If
Next
End Sub
Thanks and regards,
CHANDRA SHEKAR G
Developer Advocate
Autodesk Developer Network
