AnsweredAssumed Answered

SELECT DESIREABLE  CONFIGURATION

Question asked by Adel Taheri Aval on Sep 27, 2015
Latest reply on Sep 28, 2015 by Deepak Gupta
  • Comment • 5

HI ALL

i have a part white  several configuration and i want to active special configuration  . is there any way to select this in tree without expand the tree . Untitled.png

Deepak Gupta
Deepak Gupta Sep 28, 2015 7:42 AM
Correct Answer

Here are the codes you can try/use:

 

Option Explicit

Sub main()

    Dim swApp                   As SldWorks.SldWorks

    Dim swModel                 As SldWorks.ModelDoc2

    Dim sConfigName             As String

 

    Set swApp = Application.SldWorks

    Set swModel = swApp.ActiveDoc

    sConfigName = InputBox("Enter Configuration Name", "Activate Configuration", sConfigName)

    swModel.ShowConfiguration2 sConfigName

 

End Sub

See the reply in context
No one else had this question

Outcomes